在Excel里编VBA时,如何调用其他加载宏里的函数计算?

发布网友

我来回答

共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