PowerPoint VBA教程:SlideRange集合对象

多个对象
SlideRange (Slide)
多个对象

代表备注页或幻灯片范围的集合,该范围是一组幻灯片,少则仅包含一个,多则包含演示文稿中的所有幻灯片。要构造幻灯片范围,可通过从演示文稿中的所有幻灯片或已选择的幻灯片中选择所需的任意幻灯片。例如,可以构造一个 SlideRange集合,它包含演示文稿中的前三张幻灯片、演示文稿中所有已选择的幻灯片或演示文稿中的所有标题幻灯片。

使用 SlideRange集合

本节描述如何:

返回指定名称或索引号的一组幻灯片

使用 Slides.Range(index) 返回代表演示文稿中一组幻灯片的 SlideRange集合,其中 index 为幻灯片名称或索引号,或者为包含幻灯片名称或索引号的数组。可以使用 Array函数构建名称或索引号数组。以下示例设置当前演示文稿第一张和第三张幻灯片的背景填充。


With ActivePresentation.Slides.Range(Array(1, 3))
    .FollowMasterBackground = False
    .Background.Fill.PresetGradient msoGradientHorizontal, _
         1, msoGradientLateSunset
End With

以下示例设置当前演示文稿中幻灯片“Intro”和“Big Chart”的背景填充。请注意,幻灯片创建时被自动赋予形如 Sliden(n 为一个整数)的名称。若要赋予幻灯片更有意义的名称,请使用Name属性。


With ActivePresentation.Slides.Range(Array("Intro", "Big Chart"))
    .FollowMasterBackground = False
    .Background.Fill.PresetGradient msoGradientHorizontal, _
        1, msoGradientLateSunset
End With

虽然可以使用Range方法返回任意数量的幻灯片,如果仅想返回一个 SlideRange集合的成员,则使用Item 方法更为简单。例如,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) 从选中对象中返回一张幻灯片,其中 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"

将属性和方法应用于幻灯片范围

如同在用户界面中选中多个幻灯片并通过命令同时操作它们一样,通过建立一个 SlideRange集合并对其使用属性和方法,可以在编程中同时操作多个幻灯片。如同用户界面中用于单张幻灯片的命令不能用于多张幻灯片一样,某些应用于单独 Slide对象或只包含一张幻灯片的 SlideRange集合的属性和方法不能用于包含多张幻灯片的 SlideRange集合。一般情况下,如果选中多张幻灯片时,某些操作无法手动完成(例如返回某一幻灯片中的单个形状),则编程时也不能对包含多张幻灯片的 SlideRange集合进行该操作。

对于用户界面中可用于一张或多张选中幻灯片的操作(例如复制幻灯片到剪贴板或设置幻灯片背景填充),相应的属性和方法也可用于包含多张幻灯片的 SlideRange集合。下面是如何对多张幻灯片使用这些属性和方法的一些指导。

上页:PowerPoint VBA教程:Slide对象 下页:PowerPoint VBA教程:Slides集合对象

PowerPoint VBA教程:SlideRange集合对象

PowerPoint VBA教程:Slides集合对象 PowerPoint VBA教程:SlideShowSettings对象
PowerPoint VBA教程:SlideShowTransition对象 PowerPoint VBA教程:SlideShowView对象
PowerPoint VBA教程:SlideShowWindow对象 PowerPoint VBA教程:SlideShowWindows集合对象
PowerPoint VBA教程:SoundEffect对象 PowerPoint VBA教程:Table对象
PowerPoint VBA教程:TabStop对象 PowerPoint VBA教程:TabStops集合对象
PowerPoint VBA教程:Tags对象 PowerPoint VBA教程:TextEffectFormat对象
PowerPoint VBA教程:TextFrame对象 PowerPoint VBA教程:TextRange对象
PowerPoint VBA教程:TextStyle对象 PowerPoint VBA教程:TextStyleLevel对象
PowerPoint VBA教程:TextStyleLevels集合对象 PowerPoint VBA教程:TextStyles集合对象
PowerPoint VBA教程:ThreeDFormat对象 PowerPoint VBA教程:TimeLine对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号