带你入门VBA（2004第一期）

zhchgao

看看能不能足够幸运，谢谢

飓人

初学者想知道。！

兰色幻想

以下是引用zhou_yc在2004-11-7 11:27:00的发言：

不明白如何传附件, 只好这样传了.

目的: 一个订单依各项的型号规格,来到总用量表中调用用量. 并将结果整理到一个新建表中去. 这样可以避免太多人工的计算.

。。。。。。。

就是最后一段一直不如意,也一直没改我, 已经想了一天了.

上传表，说明要求，重做个程序

兰色幻想

以下是引用elf0486在2004-11-11 13:54:00的发言： 老师,你好,我有一个Excel文件,关系到一些机密问题,但又不得不给我的一个朋友,这个文件里面用了一些公式和函数,我不想这些公式和函数被他看到,而且关于使用上我只想让他在我指定的位置进行数据输入,我想到了将指定位置解除锁定,然后将含有公式和函数的地方进行隐藏,再将工作表保护起来,设定解除密码,但这种方法一旦将工作表全部选定后再复制到其它工作表上后即失效! 现在才知道可用VBA来解决,可我现在又急需要,能否帮忙编一个程序,限制复制、剪切、粘贴、另存，而且最好有阅读次数和时间限制，谢谢！另外，再请教一下，VBA是什么软件，是哪几个英文的简称，这个问题很菜，多谢指教！

这个问题可以用屏蔽功能键或菜单的方法参考：

http://club.excelhome.net/viewthread.php?tid=65952

VBA是什么软件？

http://club.excelhome.net/viewthread.php?tid=62008（见此贴6楼）

兰色幻想

以下是引用wzbfuture在2004-11-13 13:09:00的发言：

可以把创建按纽的方式给我说说吗

我用的是英文版excel,怎么照你们的方法创建不可按纽啊

zhi

图形、按纽都可以执行宏，只要插入图形或按纽，为它指定宏就行了，英文件版的没用过，我想应该也可以的

兰色幻想

以下是引用XK421在2004-11-14 11:09:00的发言：

“此工作簿的宏已被禁用，因为其安全性为高，......”我把安全级别改为“中”或“低”，为什么还是不能用啊？

maxlia的问题我也遇到过，每当我打开EXCEL时，个人宏工作簿会自动打开，但是会提示“该工程中的宏被禁用”，重新打开EXCEL也没用，个人宏工作簿中的宏也不能用，但是单独打开个人宏工作簿，效果就不一样了，不知道是为什么？

[em06][em06]

利用加载宏功能

兰色幻想

以下是引用XK421在2004-11-14 11:41:00的发言：

Sub 矩形2_单击() Dim i As interge For i = 1 To 15 Sheet("sheet1").cell(i, 2) = x + 100 Next Range("b16").Value = Application.WorksheetFunction.Sum(Range("b1: b15 ")) End Sub

哪位高手能帮我看看我的代码有问题吗？

为什么老是显示“在中断模式中不能执行代码”呢？

为什么会有“中断模式”？

中断模式是因为上一次执行代码时被中断，执行下一个模块代码时，必须选取消前一个模块代码的运行。

兰色幻想

以下是引用龙云枫在2004-11-13 22:02:00的发言： 好像几天没有更新了.

很抱歉，由于近来工作较忙，上网时间很少，加个一般都呆在程序版，基础版来的次数很少，以至没有及时回贴，请谅解！

Jenny_Xu99

以下是引用XK421在2004-11-14 11:41:00的发言：

Sub 矩形2_单击() Dim i As interge----------integer For i = 1 To 15 Sheet("sheet1").cell(i, 2) = x + 100----------------Sheets("sheet1") not sheet, cells not cell Next Range("b16").Value = Application.WorksheetFunction.Sum(Range("b1: b15 ")) End Sub

哪位高手能帮我看看我的代码有问题吗？

为什么老是显示“在中断模式中不能执行代码”呢？

为什么会有“中断模式”？

It's work after change[em05]

yeshuaxing

真的要好好谢谢版主