Slides コレクション オブジェクト
Presentation Slides (Slide) 複数のオブジェクト |
指定したプレゼンテーションのすべての Slide オブジェクトのコレクションです。
使い方
次の方法について説明します。
- スライドを作成し、それをコレクションに追加する
- 名前、インデックス番号、またはスライド ID 番号で指定した単一のスライドを取得する
- プレゼンテーションのスライドのサブセットを取得する
- プレゼンテーションのすべてのスライドに同時にプロパティまたはメソッドを適用する
スライドを作成し、それをコレクションに追加する
Slides コレクションを取得するには、Slides プロパティを使用します。新しいスライドを作成し、それをコレクションに追加するには、Add メソッドを使用します。次の使用例は、作業中のプレゼンテーションに新しいスライドを追加します。
ActivePresentation.Slides.Add 2, ppLayoutBlank
名前、インデックス番号、またはスライド ID 番号で指定した単一のスライドを取得する
単一の Slide オブジェクトを取得するには、Slides(index) プロパティまたは Slides.FindBySlideID(index) プロパティを使用します。Slides(index) プロパティの場合、引数 index には、スライド名またはインデックス番号を指定し、Slides.FindBySlideID(index) プロパティの場合、引数 index には、スライド ID 番号を指定します。次の使用例は、作業中のプレゼンテーションのスライド 1 にレイアウトを設定します。
ActivePresentation.Slides(1).Layout = ppLayoutTitle
次の使用例は、作業中のプレゼンテーションの "Big Chart" という名前のスライドにレイアウトを設定します。スライドが作成されると、スライドには、フォーム名 Sliden (n は整数) が自動的に割り当てられます。スライドに名前を設定するには、Name プロパティを使用します。
ActivePresentation.Slides("Big Chart").Layout = ppLayoutTitle
プレゼンテーションのスライドのサブセットを取得する
Slides コレクションのサブセットを表す SlideRange オブジェクトを取得するには、Slides.Range(index) プロパティを使用します。引数 index には、スライドのインデックス番号または名前、あるいはスライド名の配列を指定します。次の使用例は、作業中のプレゼンテーションのスライド 1 と 3 の背景色に塗りつぶしを設定します。
With ActivePresentation.Slides.Range(Array(1, 3))
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
プレゼンテーションのすべてのスライドに同時にプロパティまたはメソッドを適用する
プレゼンテーションのすべてのスライドに同時に何かを実行する (すべてのスライドの削除、プロパティの設定など) 場合、引数を指定せずに Slides.Range を使用し、Slides コレクションのすべてのスライドを含む SlideRange コレクションを作成し、次にその SlideRange コレクションに適切なプロパティまたはメソッドを適用します。次の使用例は、作業中のプレゼンテーションのすべてのスライドの背景色に塗りつぶしを設定します。
With ActivePresentation.Slides.Range
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With