Application.PresentationNewSlide イベント (PowerPoint)

  • [アーティクル]

開いているプレゼンテーション内に新規スライドが作成され、 Slides コレクションにそのスライドが追加されるときに発生します。

構文

式。 PresentationNewSlide( _Sld_ )

式Application オブジェクトを返す式。

パラメーター

名前 必須 / オプション データ型 説明
Sld 必須 Slide 新しいスライドです。

例

次の使用例は、配色 3 の背景色を変更し、変更した配色を次のスライドに適用します。 次に、レイアウト枠がある場合は、図形 1 に既定のテキストを追加します。

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

関連項目

Application オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。