Table of contents
Collapse the table of content
Expand the table of content

Application.AfterPresentationOpen Event (PowerPoint)

office 365 dev account|Last Updated: 6/12/2017
1 Contributor

Occurs after an existing presentation is opened.


expression. AfterPresentationOpen( Pres )

expression An expression that returns a Application object.


NameRequired/OptionalData TypeDescription
PresRequiredPresentationThe presentation that is opened.


This example modifies the background color for color scheme three, applies the modified color scheme to the presentation that was opened, and displays the presentation in Slide view.

Private Sub App_AfterPresentationOpen(ByVal Pres As Presentation)

    With Pres

        Set CS3 = .ColorSchemes(3)

        CS3.Colors(ppBackground).RGB = RGB(240, 115, 100)

        With Windows(1)

            .Selection.SlideRange.ColorScheme = CS3

            .ViewType = ppViewSlide

        End With

    End With

End Sub

See also


Application Object

© 2018 Microsoft