一、SlideShowView对象
使用 SlideShowWindow 对象的 View 属性可返回 SlideShowView 对象。以下示例对第一个幻灯片放映窗口进行设置,以便显示演示文稿中的第一张幻灯片。
SlideShowWindows(1).View.First
使用 SlideShowSettings 对象的 Run 方法可创建一个 SlideShowWindow 对象,然后使用 View 属性可返回该窗口(前面返回的那个对象)所包含的 SlideShowView 对象。以下示例将运行当前演示文稿的幻灯片放映,并将指针更改为笔形,然后将幻灯片放映中此笔形的颜色设置为红色。
With ActivePresentation.SlideShowSettings.Run.View
.PointerColor.RGB = RGB(255, 0, 0)
.PointerType = ppSlideShowPointerPen
End With
二、SlideShowWindow 对象
代表运行幻灯片放映的窗口。
使用 SlideShowWindow 对象
使用 SlideShowWindows(index) 返回单个 SlideShowWindow 对象,其中 index 表示幻灯片放映窗口的索引号。以下示例将激活第二个幻灯片放映窗口。
SlideShowWindows(2).Activate
使用 Run 方法新建一个幻灯片放映窗口并返回对该幻灯片放映窗口的引用。以下示例将运行当前演示文稿的一个幻灯片放映,并缩小幻灯片放映窗口的高度以便可看到任务栏(对于分辨率为 800 x 600 的屏幕)。
With ActivePresentation.SlideShowSettings
.ShowType = ppShowTypeSpeaker
With .Run
.Height = 300
.Width = 400
End With
End With
使用 View 属性返回指定幻灯片放映窗口中的视图。以下示例设置第一个幻灯片放映窗口中的视图,以显示演示文稿中的第三张幻灯片。
SlideShowWindows(1).View.GotoSlide 3
使用 Presentation 属性返回当前在指定幻灯片放映窗口中运行的演示文稿。以下示例显示当前在第一个幻灯片放映窗口中运行的演示文稿的名称。
MsgBox SlideShowWindows(1).Presentation.Name
三、SlideShowWindows集合对象
代表 PowerPoint 中打开的幻灯片放映的所有 SlideShowWindow 对象的集合。
使用 SlideShowWindows 集合
使用 SlideShowWindows 属性返回 SlideShowWindows 集合。使用 SlideShowWindows(index)返回单个 SlideShowWindow 对象,其中 index 为窗口索引号。以下示例降低第一个幻灯片放映窗口的高度(假设它是全屏的)。
With SlideShowWindows(1)
If .IsFullScreen Then
.Height = .Height - 20
End If
End With
使用 Run 方法创建新幻灯片窗口并添加到 SlideShowWindows 集合。以下示例运行当前演示文稿的一个幻灯片放映。
ActivePresentation.SlideShowSettings.Run