SlideShowTransition Property Example
This example sets slide two in the active presentation to advance automatically after 5 seconds during a slide show and to play a dog bark sound at the slide transition.
With ActivePresentation.Slides(2).SlideShowTransition
.AdvanceOnTime = True
.AdvanceTime = 5
.SoundEffect.ImportFromFile "c:\windows\media\dogbark.wav"
End With
ActivePresentation.SlideShowSettings.AdvanceMode = _
ppSlideShowUseSlideTimings