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

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

	

See also

Application Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.