Application.SlideShowNextBuild Event (PowerPoint)
Occurs upon mouse-click or timing animation, but before the animated object becomes visible. .
Syntax
expression .SlideShowNextBuild(Wn)
expression A variable that represents an Application object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Wn |
Required |
SlideShowWindow |
The active slide show window. |
Remarks
For information about using events with the Application object, see How to: Use Events with the Application Object.
Example
If the current shape on slide one is a movie, this example plays the movie continuously until stopped manually by the presenter. This code is designed to be used with the second SlideShowNextSlide event example.
Private Sub App_SlideShowNextBuild(ByVal Wn As SlideShowWindow)
If EvtCounter <> 0 Then
With ActivePresentation.Slides(1) _
.Shapes(shpAnimArray(2, EvtCounter))
If .Type =msoMedia Then
If .MediaType = ppMediaTypeMovie
.AnimationSettings.PlaySettings _
.LoopUntilStopped
End If
End If
End With
End If
EvtCounter = EvtCounter + 1
End Sub