SlideRange 对象 (PowerPoint)
代表备注页或幻灯片范围的集合,该范围是一组幻灯片,少则仅包含一个,多则包含演示文稿中的所有幻灯片。
备注
您可以包括任何所需的幻灯片 从演示文稿中所有幻灯片或所选内容中的所有幻灯片选择 以构造幻灯片范围。 例如,可以构造一个包含在演示文稿,该演示文稿中所有选定的幻灯片或演示文稿中的所有标题幻灯片的前三张幻灯片的 SlideRange 集合。
就像您可以操作多个幻灯片同时在用户界面中进行选择并应用一个命令,您可以编程方式使用多张幻灯片在同一时间通过建立一个 SlideRange 集合并对其使用属性或方法。 并且就像选择多张幻灯片时,某些用户界面中的命令的单个幻灯片上不有效,一些属性和工作上的 幻灯片 对象或包含只有一张幻灯片的 SlideRange 集合的方法将失败如果对包含多张幻灯片的 SlideRange 集合。 一般情况下,如果不能是手动选择多张幻灯片后 (例如返回一个幻灯片中的单个形状),则不能它以编程方式使用包含多张幻灯片的 SlideRange 集合。
有关的操作的用户界面中是否有一张或多张选中 (例如复制幻灯片到剪贴板或设置幻灯片背景填充),相应的属性和方法将工作包含多张幻灯片的 SlideRange 集合。 以下是这些属性和方法时的行为方式对多张幻灯片的一些一般原则。
将方法应用于一个 SlideRange 集合,等效于将该方法应用于作为一组该范围内所有 幻灯片 的对象。
设置的值, SlideRange 集合的属性等效于设置该属性的值在该范围内的每张幻灯片单独 (采用枚举的类型时,将该值设置为"Mixed"值的属性不起作用)。
如果集合中的所有幻灯片对于该属性相同的值, SlideRange 集合返回枚举的类型的属性返回集合中单张幻灯片的属性值。 如果集合中的幻灯片具有相同的值的属性,该属性将返回"Mixed"值。
如果 SlideRange 集合中的所有幻灯片对于某个返回简单数据类型(如 Long、Single 或 String)的属性具有相同的值,则该属性将返回该集合中单张幻灯片的该属性值。 如果幻灯片集合中的具有相同值的属性,该属性将返回-2 或产生一个错误。 例如,在包含多张幻灯片的 SlideRange 对象上使用 Name 属性将生成一个错误,因为每张幻灯片具有其 Name 属性为不同的值。
幻灯片的某些格式设置属性未设置的属性和方法,将直接应用于 SlideRange 集合中,但通过属性和方法应用于一个 SlideRange 集合,例如, 添加的配色 方案中包含的对象。 如果所含的对象代表用户界面中的多个对象可以执行的操作,您可以从包含多个幻灯片的 SlideRange 集合返回该对象,其属性和方法遵循前述规则。 例如,可以使用 添加的配色 属性以返回 添加的配色 方案,它表示用于指定 SlideRange 集合中的所有幻灯片的配色方案。 为此 添加的配色 方案设置属性还将设置这些属性, 添加的配色 对象 SlideRange 集合中的所有单个幻灯片上。
以下示例说明如何执行下列操作:
返回一组通过名称或索引号指定的幻灯片
返回演示文稿中全部或部分选定的幻灯片
返回备注页
将属性和方法应用于某个幻灯片范围
示例
使用 Slide.Range (索引) ,其中 index 是幻灯片的名称或索引号或包含幻灯片名称或索引号的数组,可返回一个 SlideRange 集合,该集合代表演示文稿中的一组幻灯片。 使用 Array 函数构造名称或索引号数组。 下面的示例设置活动演示文稿中第一和三张幻灯片的背景填充。
With ActivePresentation.Slides.Range(Array(1, 3))
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
下面的示例设置活动演示文稿中名为"Intro"和"大图表"的幻灯片的背景填充。 请注意,幻灯片会自动分配生成 sliden (其中 n 为整数) 的名称创建时。 要为幻灯片更有意义的名称,请使用Name属性。
With ActivePresentation.Slides.Range(Array("Intro", "Big Chart"))
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
虽然可以使用Range方法返回任意数目的幻灯片,则使用Item方法,如果您只想返回 SlideRange 集合的单个成员更简单。 例如, Slides(1)
是比 Slides.Range(1)
更简单。
使用 Selection 对象的SlideRange属性返回选定内容中的所有幻灯片。 下面的示例设置一个假设是至少一个选定的幻灯片的窗口中所有选定幻灯片的背景填充。
With Windows(1).Selection.SlideRange
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
使用 Selection.SlideRange (索引) (其中 index 是幻灯片名称或索引号)从所选内容返回一张幻灯片。 下面的示例在一个假设都至少两个选择的幻灯片的窗口中设置选定幻灯片的集合中的第二张幻灯片的背景填充。
With Windows(1).Selection.SlideRange(2)
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
使用 NotesPage 属性返回一个 SlideRange 集合,代表指定的备注页。 下面的示例在当前演示文稿中插入文本二个占位符 (备注区) 第一张幻灯片的备注页上。
ActivePresentation.Slides(1).NotesPage.Shapes _
.Placeholders(2).TextFrame.TextRange.InsertAfter "Added Text"
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。