在演示过程中运行Powerpoint宏

Question

我是VBA Powerpoint的新手。我写了一个宏（该宏大声读出了活动幻灯片中文本框的内容）。我要在进行实时PowerPoint演示时转到下一张幻灯片时执行此宏。 click下一张幻灯片时如何确保该宏运行？

Answer 1

在Powerpoint中很难找到这些事件，但是this document might help you就是这样。

以下是使用事件OnSlideshowPageChange

的一些入门代码

Sub OnSlideShowPageChange()
    Dim i As Long
    i = ActivePresentation.SlideShowWindow.View.CurrentShowPosition

    Select Case i

        Case 1
            'do something for page one

        Case 2
            'do something for page two

        Case 3
            'do something for page three... etc.


    End Select


End Sub