在特定幻灯片加载时或在计时器上调用子例程

时间:2010-07-08 13:16:39

标签: powerpoint powerpoint-vba

我正在使用PowerPoint 2003演示文稿进行自助服务终端显示,并且它几乎全天候运行。其中一张幻灯片包含天气,当前日期和7天预报。

我已经编写了将从Excel工作簿更新天气的子程序,并更新显示的日期,但是现在我必须在我进入时手动更新它。有没有办法让我可以有一个子程序(例如UpdateSlide())在幻灯片显示到达特定幻灯片时调用?似乎没有官方的方法可以做到这一点,我出于安全原因假设,但是如果定时事件,它会称之为每六个小时?

2 个答案:

答案 0 :(得分:8)

使用内置的OnSlideShowPageChange事件:

Public Sub OnSlideShowPageChange(ByVal Wn As SlideShowWindow)
   If Wn.View.CurrentShowPosition = 3 Then
       'Perform Updates for slide #3
   EndIf
End Sub

编辑:正如kcoppock指出的那样,你可以将这段代码放在任何模块中。

答案 1 :(得分:0)

事件SlideShowNextSlide正是您所需要的。有关如何使用它的示例,请参阅How to write PowerPoint slide change to a file?