如何从 Outlook 调用 xlam 文件中的 Excel 宏？

【问题标题】：How to call Excel macro in xlam file from Outlook?如何从 Outlook 调用 xlam 文件中的 Excel 宏？
【发布时间】：2021-07-23 15:45:14
【问题描述】：

我想从 Outlook 调用宏。

我可以使用 Excel .xlsm 文件来完成。

如何在插件 .xlam 文件中调用宏？

.xlsm 示例

Sub trans_outlook()
    Dim xlApp As Object, xlWkb As Object
    Set xlApp = CreateObject("Excel.Application")
    xlApp.Visible = False ' can be False if you do not wont see reaction, byt make sure is not fail
    Set xlWkb = xlApp.Workbooks.Open("C:\Users\xyz.xlsm")
    xlApp.Run "xyz.xlsm!Test"
    xlWkb.Close savechanges:=False
    xlApp.Quit
End Sub

【问题讨论】：

标签： excel vba outlook

【解决方案1】：

您需要转到工具 -> 参考。在列表中找到Microsoft Excel 14.0 Data Objects Library，然后选中它旁边的框。点击确定

 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

【讨论】：

为什么要打开 .xls 文件？它是文件 .xlam（插件）。在这个文件中，宏 A。我想从 Outlook 调用宏 A。