vba - 如何让 Powerpoint 在动画中调用我的 VBA 子例程？

Question

我最终想做的是ShellExecute()每次在我的 PowerPoint 幻灯片放映中出现新幻灯片时，都会使用命令行程序。我正在使用 Office 2003 PowerPoint。

我做了以下事情:

工具 > 选项 > 安全选项 > 宏观安全 > 安全级别 = 中

工具 > 选项 > 宏 > VBA 编辑器:

Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
  MsgBox ("OnSlideShowPageChange")
End Sub

文件 > 保存

返回 PowerPoint:F5(用于幻灯片放映 > 查看放映)。没有看到消息框

退出 PowerPoint，重新打开 .ppt 文件，再次按 F5)。还是看不到消息框

问题 : 我错过了什么？为什么不是 OnSlideShowPageChange当我运行幻灯片时被调用？？？

Answer 1

它对我来说工作得很好，完全使用你上面的步骤。我能想到的唯一想法是在上面的第 2 步，你可能把自动宏 OnSlideShowPageChange在类或用户窗体中。它应该进入一个模块(任何模块，任何名称)。或者你那里有其他可能干扰的代码，比如你是否也在下沉 SlideShowNextSlide事件？