excel - 如何在 Excel 2016/2019 的 Personal Macro 文件夹外引用 .XLAM 插件中的 Excel 宏(非函数)？

Question

我们可以创建一个带有自定义函数 (UDF) 的 .XLAM 插件。一旦我们将 Excel 连接到插件，就可以从另一个工作簿调用这些 UDF，而不管插件保存在何处(甚至在 Personal Macros 文件夹之外)。

但对于保存在同一个 .XLAM 文件中的宏(子程序)，则不能这样做。根据我的研究和试验，如果插件保存在 Personal Macros 文件夹中，似乎可以正确调用子过程。但是，如果插件保存在其他地方，则在按 Alt-F8 时宏不会显示在宏列表中。

有解决办法吗？我们需要将插件保存在 C:\OneDrive\Macros\Addin.xlam 中，因为插件会经常更新，这样就可以避免大家通过 OneDrive 自动更新时的麻烦。

我们使用的是 Excel 2016 和 2019。

Answer 1

经过数周的研究和尝试不同的方法，我发现最好的方法如下:

1. 确保将宏源(例如 MyMacros.xlsm)保存为 MyMacros.xlam，以便加载项包含最新的宏和函数。

2. 确保在单击文件 - 选项(或 Alt - F、T)加载项 - 管理 Excel 加载项 - 转到 (G) 中连接 MyMacros.xlam 加载项

3. 在第二个 Excel 文件(假设为 MyExcel.xlsm)中，打开 VBA 编辑器 (Alt-F11)。选择 MyMacros.xlam 项目并将名称重命名为 MyMacros 以有所不同(图片)在我的示例图片中，MyMacros 是 FreelensiaMacros。

4. 如果您打开了多个 XL 文件，请单击左侧 VBA 项目列表 Pane 中的 MyExcel 项目(不是 MyMacros!)。然后转到工具 - 引用并从列表中选择 MyMacros。您现在应该在左侧的 VBA 项目面板中看到一个新引用(图片)

5., 创建一个名为 CallMyMacrosMod 的模块，并使用 Application.Run 从 MyMacros.xlam 文件中输入几个宏名称，例如:

   Sub FormatTables()
     Application.Run "MyMacros.FormatTables"
   End Sub

在 MyMacros.xlsm 文件本身存储调用所有宏的命令中构造文本很方便。然后您可以复制并粘贴到 Word(以避免 quotes problem )，然后从 Word 复制并粘贴到此 VBA 编辑器中。

1. 保存并关闭 VBA 窗口。您现在可以从 MyExcel 文件的宏列表中调用 MyMacros 宏，而无需让 MyMacros 打开，只需键入 Alt-F8。

1. 保存并关闭您的 XL 文件。

资料来源: https://www.myonlinetraininghub.com/calling-vba-in-add-ins-from-vba-modules