在簡報中的所有 NamedSlideShow 物件的集合。 每個 NamedSlideShow 物件都代表自訂的投影片放映。
範例
使用NamedSlideShows屬性可傳回 NamedSlideShows 集合。 使用 NamedSlideShows (索引) ,其中 index 是自訂投影片的名稱或索引號,以回傳單一 NamedSlideShow 物件。 下列範例會刪除自訂的投影片放映名為"Quick Show"。
ActivePresentation.SlideShowSettings _
.NamedSlideShows("Quick Show").Delete
使用Add方法建立新的投影片放映並將其新增至 NamedSlideShows 集合。 下列範例會新增至使用中簡報之名為"Quick Show"包含 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 "Quick Show", qSlides
.RangeType = ppShowNamedSlideShow
.SlideShowName = "Quick Show"
.Run
End With
End With
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。