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

Question

我正在为信息亭显示使用 PowerPoint 2003 演示文稿，并且它几乎 24/7 运行。一张幻灯片上有天气、当前日期和 7 天预报。

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

Answer 1

使用内置 OnSlideShowPageChange事件:

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

编辑:正如 kcoppock 指出的那样，您可以将此代码放在任何模块中。