如何从Outlook宏运行Excel宏？

Question

如何从Outlook宏运行Excel宏？

Answer 1

您将需要添加Microsoft Excel 14.0数据对象库.转到工具 - >参考.

您还需要先打开工作簿,然后才能从中运行宏.

这应该工作:

 Dim ExApp As Excel.Application
 Dim ExWbk As Workbook
 Set ExApp = New Excel.Application
 Set ExWbk = ExApp.Workbooks.Open("C:\Folder\Folder\File.xls")
 ExApp.Visible = True

 ExWbk.Application.Run "ModuleName.YourMacro"

 ExWbk.Close SaveChanges:=True

如果要在后台运行此宏而不打开Excel的可见实例,请将ExApp.Visible设置为False.