假设你这个word文档中需要调用宏的名称是Macro1,你word文档的全路径文件名是C:\aaa.dot,那么你可以做以下的事情。 新建一个标准exe工程,在Form1_Load事件中写入以下代码。 Dim objDocument As Object Dim objApp Object set objDocument = CreateObject("c:\aaa.dot") set objApp = createObject("word.application") objApp.Run "Macro1"注意在运行Macro1之前激活aaa.dot,使之成为当前的selection
新建一个标准exe工程,在Form1_Load事件中写入以下代码。
Dim objDocument As Object
Dim objApp Object
set objDocument = CreateObject("c:\aaa.dot")
set objApp = createObject("word.application")
objApp.Run "Macro1"注意在运行Macro1之前激活aaa.dot,使之成为当前的selection