Slides集合对象:在指定演示文稿中所有 Slide 对象的集合。
使用Slides集合其功能描述如下:
创建一个幻灯片并添加到集合
返回一个指定名称、幻灯片索引号、或幻灯片 ID 号的幻灯片
返回演示文稿中幻灯片的子集
同时将一种属性或方法应用到演示文稿中的所有幻灯片
创建一个幻灯片并添加到集合
使用 Slides 属性返回 Slides 集合。使用 Add 方法创建新幻灯片并添加到集合。以下示例将新幻灯片添加到当前演示文稿中。
ActivePresentation.Slides.Add 2, ppLayoutBlank
返回指定名称、幻灯片索引号或幻灯片 ID 号的幻灯片
使用 Slides(index)(其中 index 为幻灯片名称或索引号)或 Slides.FindBySlideID(index)(其中 index 为幻灯片 ID 号)返回一个 Slide 对象。以下示例设置当前演示文稿第一张幻灯片的版式。
ActivePresentation.Slides(1).Layout = ppLayoutTitle
以下示例设置当前演示文稿中名为“Big Chart”的幻灯片的版式。请注意,幻灯片创建时被自动赋予一个形如 Sliden(其中 n 为一整数)的名称。若要给幻灯片赋予一个更有意义的名称,请使用 Name 属性。
ActivePresentation.Slides("Big Chart").Layout = ppLayoutTitle
返回演示文稿中幻灯片的子集
使用 Slides.Range(index)返回代表 Slides 集合的一个子集的 SlideRange 对象,其中 index 为幻灯片索引号或名称,或者幻灯片索引号或名称的数组。以下示例设置当前演示文稿第一张和第三张幻灯片的背景填充。
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