发布网友
共5个回答
热心网友
本示例示范如何调用宏表“Mycustom.xlm”( 必须先打开此宏表 〕中定义的宏函数 My_Func_Sum。此函数带两个数值型参数(此例中为 1 和
5)。
mySum = Application.Run("MYCUSTOM.XLM!My_Func_Sum", 1, 5)
MsgBox "Macro result: " & mySum
注意括号里面的文字:必须先打开此宏表,这意味着在使用“Mycustom.xlm"中定义的宏函数My_Func_Sum之前,需要先把Mycustom.xlm打开
热心网友
调用函数可以这写:Run (工作簿名!宏名,参数1,参数2……)
例如调用A1.xls文件里宏名称为ABC的宏,假定宏参数为1和5,代码为:Run ("A1.xls!ABC",1,5)。注意被调用宏的文件(A1.xls)要处于打开状态。
因此上面这句可以试试这么写:a3 = Application.Run("waspcn.xll!H_PT67", a1, a2)
热心网友
很简单:Run (工作簿名!宏名,参数1,参数2……)
例如调用A1.xls文件里宏名称为ABC的宏,假定宏没有参数,代码为:Run "A1.xls!ABC"
因为不需要返回值,括号省略。注意被调用宏的文件(A1.xls)要处于打开状态。
热心网友
直接使用call调用就好。因为所有的宏都有都在模块里面。在程序中需要调用直接输入宏名就好了。
热心网友
Funcation Test()
End Function
'引用
call Test