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