说明

以下示例说明如何执行下列操作：

• 创建一张幻灯片并将其添加到集合中
• 返回通过名称、索引号或幻灯片 ID 号指定的单张幻灯片
• 返回演示文稿中幻灯片的子集
• 同时将一种属性或方法应用到演示文稿中的所有幻灯片

示例

使用 Slides 属性返回 Slides 集合。使用 Add 方法新建幻灯片并将其添加到集合中。以下示例将新幻灯片添加到活动演示文稿中。

ActivePresentation.Slides.Add(2, ppLayoutBlank)

使用 Slides(index)（其中 index 是幻灯片名称或索引号）或使用 Slides.FindBySlideID(index)（其中 index 是幻灯片 ID 号）返回单个 Slide 对象。以下示例设置活动演示文稿中第一张幻灯片的版式。

ActivePresentation.Slides.Item(1).Layout = ppLayoutTitle

以下示例设置活动演示文稿中名为“Big Chart”的幻灯片的版式。请注意，在创建幻灯片时为其指定自动生成的名称，其形式为 Sliden（其中 n 为整数）。要为幻灯片指定更有意义的名称，请使用 Name 属性。

ActivePresentation.Slides.Item("Big Chart").Layout = ppLayoutTitle

使用 Slides.Range(index) 返回代表 Slides 集合的一个子集的 SlideRange 对象，其中 index 是幻灯片索引号或名称，或者幻灯片索引号的数组或幻灯片名称的数组。以下示例设置当前演示文稿中第一张和第三张幻灯片的背景填充。

let slides2 = ActivePresentation.Slides.Range([1, 3])
slides2.FollowMasterBackground = false
slides2.Background.Fill.PresetGradient(msoGradientHorizontal, 1, msoGradientLateSunset)

如果要同时对演示文稿中所有幻灯片进行某种操作（例如全部删除或设置它们的某些属性），可不带参数使用 Slides.Range 创建一个包含 Slides 集合中所有幻灯片的 SlideRange 集合，然后将适当的属性或方法应用于 SlideRange 集合。本示例设置当前演示文稿所有幻灯片的背景填充。

let slides2 = ActivePresentation.Slides.Range()
slides2.FollowMasterBackground = false
slides2.Background.Fill.PresetGradient(msoGradientHorizontal, 1, msoGradientLateSunset)