Application.SlideShowEnd Event (PowerPoint)

Office 2013 and later
GitHub-Mark-64px

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Occurs after a slide show ends, immediately after the last SlideShowNextSlide event occurs.

expression .SlideShowEnd(Pres)

expression An expression that returns a Application object.

Parameters

Name

Required/Optional

Data Type

Description

Pres

Required

Presentation

The presentation closed when this event occurs.

The SlideShowEnd event always occurs before a slide show ends if the SlideShowBegin event has occurred. You can use the SlideShowEnd event to return any property settings and variable initializations that occur in the SlideShowBegin event to their original settings.

For information about using events with the Application object, see How to: Use Events with the Application Object.

This example turns off the entry effect and automatic advance timing slide show transition effects for slides one through four at the end of the slide show. It also sets the slides to advance manually.

Private Sub App_SlideShowEnd(ByVal Pres As Presentation)

    With Pres.Slides.Range(Array(1, 4)) _

            .SlideShowTransition

        .EntryEffect = ppEffectNone

        .AdvanceOnTime = msoFalse

    End With



    With Pres.SlideShowSettings

        .AdvanceMode = ppSlideShowManualAdvance

    End With

End Sub
Show: