NamedSlideShows 属性

       

返回一个 NamedSlideShows 集合,该集合代表指定演示文稿中所有命名的幻灯片放映(即自定义幻灯片放映)。每个命名的幻灯片放映或自定义放映,都是指定演示文稿的一个用户定义的子集。只读。

说明

使用 NamedSlideShows 对象的 Add 方法创建命名幻灯片放映。

示例

本示例为当前演示文稿添加一个命名幻灯片放映“Quick Show”(该放映包含第二、第七和第九张幻灯片),然后运行该放映。

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
        .RangeType = ppShowNamedSlideShow
        .NamedSlideShows.Add "Quick Show", qSlides
        .SlideShowName = "Quick Show"
        .Run
    End With
End With