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

    原文作者:NarutoInspire
    原文地址: https://blog.csdn.net/NarutoInspire/article/details/100981562
    本文转自网络文章,转载此文章仅为分享知识,如有侵权,请联系博主进行删除。
点赞