缺少变量或过程，不是模块

salatino · 发表于 2011-12-26 11:22

各位高手，问题如下：

我定义了两个宏，并把该宏的名称由模块1和模块2改为modaa和modbb
Function aa(x, y, z)
Application.Volatile
......
End Function

Function bb(a, b, c)
Application.Volatile
......
End Function

然后
在thisworkbook中加入如下代码
Private Sub Workbook_Open()
modaa
modbb
End Sub

然后一执行就出现编译错误：缺少变量或过程，不是模块
尝试加call也没用，求助各位高手，给点指导意见！！！先谢谢了！！！

bayuejun · 发表于 2011-12-26 12:10

把那两个函数放在一个模块里面就可以了。

salatino · 发表于 2011-12-26 13:41

本帖最后由 salatino 于 2011-12-26 13:44 编辑

bayuejun 发表于 2011-12-26 12:10
把那两个函数放在一个模块里面就可以了。

放在一起定义modaa如下

Function aa(r, c, t)
Application.Volatile
......
End Function
Function bb(r, c, t)
Application.Volatile
.......
End Function

在thisworkbook里写如下代码
Private Sub Workbook_Open()
modaa
End Sub

也不行啊！还是说缺少变量或过程，不是模块。还有没有别的办法？

Zamyi · 发表于 2011-12-26 13:44

Function 和Sub的区别

salatino · 发表于 2011-12-26 13:45

坐等各位高手支招

bayuejun · 发表于 2011-12-26 13:47

直接写函数名就可以了

salatino · 发表于 2011-12-26 13:51

试过，出现编译错误，参数不可选

salatino · 发表于 2011-12-26 13:52

Private Sub Workbook_Open()
aa
bb
End Sub

salatino · 发表于 2011-12-26 14:01

弄这个的目的是想要在打开工作簿时在所有工作表中自动执行宏，目前我做出的工作簿在打开时只能自动算出打开时显示的工作表的结果，但切换到其他工作表时不能自动计算结果，必须点中一个单元格的公式回车，这个工作簿中有20来个算法相同的工作表，这样察看各表的结果时就会很麻烦，而且计算的也很慢，一个工作簿所有工作表看一遍需要二十来分钟，主要时间都用在激活公式上了。

这个问题困扰了我很长时间了，在百度和论坛中搜索了很多次，能看懂的解决不了，其余的或许能解决，但我看不懂，呵呵，不懂VB编程，这是我第一次用宏如能解决，不胜感激！

Zamyi · 发表于 2011-12-26 14:07

本帖最后由 Zamyi 于 2011-12-26 14:07 编辑

{:soso_e110:}四楼不是说了吗？function调用要加参数，下面都没问题。
call aa(x, y, z)
aa x, y, z
xx=aa(x, y, z)

		自动登录	找回密码
密码			免费注册

[求助] 缺少变量或过程，不是模块