當投影片切換時 (VBA)

Posted on 2013 年 02 月 08 日 by cowman.chiang 
Sub OnSlideShowPageChange()
    MsgBox ActivePresentation.Slides(ActiveWindow.Selection.SlideRange.SlideNumber).Shapes.Title.TextFrame.TextRange.Text
End Sub
This entry was posted in Office, PowerPoint. Bookmark the permalink.