Skip to content

Latest commit

 

History

History
77 lines (41 loc) · 1.58 KB

PowerPoint.Application.PresentationNewSlide.md

File metadata and controls

77 lines (41 loc) · 1.58 KB
title keywords f1_keywords api_name ms.assetid ms.date ms.localizationpriority
Application.PresentationNewSlide event (PowerPoint)
vbapp10.chm621008
vbapp10.chm621008
PowerPoint.Application.PresentationNewSlide
e9718cad-6411-d013-6c93-0370aa71a8f2
06/08/2017
medium

Application.PresentationNewSlide event (PowerPoint)

Occurs when a new slide is created in any open presentation, as the slide is added to the Slides collection.

Syntax

expression. PresentationNewSlide( _Sld_ )

expression An expression that returns an Application object.

Parameters

Name Required/Optional Data type Description
Sld Required Slide The new slide.

Example

This example modifies the background color for color scheme three and then applies the modified color scheme to the new slide. Next, it adds default text to shape one if it has a text frame.

Private Sub App_PresentationNewSlide(ByVal Sld As Slide)

    With ActivePresentation

        Set CS3 = .ColorSchemes(3)

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

        Windows(1).Selection.SlideRange.ColorScheme = CS3

    End With



    If Sld.Layout <> ppLayoutBlank Then

        With Sld.Shapes(1)

            If .HasTextFrame = msoTrue Then

               .TextFrame.TextRange.Text = "King Salmon"

            End If

        End With

    End If

End Sub

See also

Application Object

[!includeSupport and feedback]