PPt能自动运行宏吗？

weiyingde

可以的，提供两个实例，看后，如果有效，告我一声；能赏朵小花，则喜出望外了，请看：
                                                        PowerPoint在播放时自动运行宏
    PowerPoint在播放时自动运行宏，要用到OnSlideShowPageChange和OnSlideShowTerminate ，有了这两个事件函数，我们就可以在演示文稿开始放映、放映过程中及放映结束时自动运行自己编辑的宏了。
OnSlideShowPageChange的使用
    在一个ppt中，注意，需要启用宏，在安全级别设置为启用全部宏。大开VBA编辑器(Atl+F11)，在其中插入一个模块，向代码窗口中输入如下代码：

Sub OnSlideShowPageChange()
   If ActivePresentation.SlideShowWindow.View.CurrentShowPosition = 1 Then
      MsgBox "I love you"
   End If
End Sub
    放映，我们首先会看到播放地一个页面前会显示“I love you.”的消息框，点击确定后，放映第一张幻灯片。ActivePresentation.SlideShowWindow.View.CurrentShowPosition = 1 ，这是当前播放的幻灯片的位置。
    同样OnSlideShowTerminate，是在幻灯片放映结束时触发的事件，使用方式同OnSlideShowPageChange

zp_5566

weiyingde 发表于 2016-1-10 09:07
可以的，提供两个实例，看后，如果有效，告我一声；能赏朵小花，则喜出望外了，请看：
                   ...

这个方法我试过了，但是打开PPTM（07版本的PPT）时还是无法自动执行宏
必须要将宏运行一遍才行，这怎么破？？？？

weiyingde

zp_5566 发表于 2017-8-2 12:15
这个方法我试过了，但是打开PPTM（07版本的PPT）时还是无法自动执行宏
必须要将宏运行一遍才行，这怎么 ...

这两个宏必须在标准模块中，否则正如你说的那样。