如何通过OnAction在PowerPoint右键菜单中引用PPAM内的宏？

可以实现，以下是两种可靠的方案：

方案一：直接在OnAction中指定PPAM宏路径 #

在创建右键菜单的代码里，将OnAction属性设置为Application.Run调用语句，明确指向PPAM文件中的宏：

' 假设你的PPAM文件名为"EasyTools.ppam"，宏位于modRibbonInterface模块，名为cllbckInsertSlides
cmdBarControl.OnAction = "Application.Run(""EasyTools.ppam!modRibbonInterface.cllbckInsertSlides"")"

注意：VBA中字符串内的双引号需要用两个双引号转义；确保PPAM已在PowerPoint中加载。

为避免硬编码文件名，可动态获取已加载的PPAM对象：

Dim targetAddIn As AddIn
' 替换为你的PPAM在加载项列表中的显示名称
Set targetAddIn = Application.AddIns("易用性工具集")

cmdBarControl.OnAction = "Application.Run(""" & targetAddIn.Name & "!modRibbonInterface.cllbckInsertSlides"")"

方案二：通过代理宏中转调用 #

1. 在PPAM的标准模块（如modContextMenuProxy）中创建公共代理宏：

Public Sub ProxyInsertSlides()
    ' 直接调用目标宏
    Call modRibbonInterface.cllbckInsertSlides
End Sub

2. 右键菜单的OnAction指向该代理宏，同样通过Application.Run指定PPAM来源：

cmdBarControl.OnAction = "Application.Run(""EasyTools.ppam!modContextMenuProxy.ProxyInsertSlides"")"

关键注意事项 #

• 目标宏必须用Public修饰，且位于标准模块中（类模块的宏无法直接通过这种方式调用）
• 用户需在PowerPoint中正确加载该PPAM（文件选项→加载项→启用目标PPAM）
• 需配置PowerPoint信任中心，允许加载带宏的加载项并启用宏

内容的提问来源于stack exchange，提问作者Jonathan