NamedSlideShows コレクション オブジェクト

NamedSlideShows コレクション オブジェクト

SlideShowSettings NamedSlideShows NamedSlideShow

プレゼンテーションのすべての NamedSlideShow オブジェクトのコレクションです。各 NamedSlideShow オブジェクトは、目的別スライド ショーを表します。

使い方

NamedSlideShows コレクションを取得するには、NamedSlideShows プロパティを使用します。単一の NamedSlideShow オブジェクトを取得するには、NamedSlideShows(index) プロパティを使用します。引数 index には、目的別スライド ショー名またはインデックス番号を指定します。次の使用例は、"クイック ショー" という名前の目的別スライド ショーを削除します。

ActivePresentation.SlideShowSettings _
    .NamedSlideShows("クイック ショー").Delete
		

新しいスライド ショーを作成し、それを NamedSlideShows コレクションに追加するには、Add メソッドを使用します。次の使用例は、作業中のプレゼンテーションにスライド 2､ 7 および 9 を含む "クイック ショー" という名前の目的別スライド ショーを追加します。この使用例は、目的別スライド ショーを実行します。

Dim qSlides(1 To 3) As Long
With ActivePresentation
    With .Slides
        qSlides(1) = .Item(2).SlideID
        qSlides(2) = .Item(7).SlideID
        qSlides(3) = .Item(9).SlideID
    End With
    With .SlideShowSettings
        .NamedSlideShows.Add "クイック ショー", qSlides
        .RangeType = ppShowNamedSlideShow
        .SlideShowName = "クイック ショー"
        .Run
    End With
End With