【转】PowerPoint VBA教程:Slide对象
(2014-05-27 07:22:28)
标签:
杂谈 |
多个对象
http://www.feiesoft.com/vba/powerpoint/images/parchild.gifVBA教程:Slide对象" TITLE="【转】PowerPoint
http://www.feiesoft.com/vba/powerpoint/images/parchild.gifVBA教程:Slide对象" TITLE="【转】PowerPoint
代表一个幻灯片。Slides集合包含演示文稿中的所有 Slide对象。
注意
使用 Slide对象
本节描述如何:
返回一个以名称、索引号或幻灯片标识符指定的幻灯片 返回所选对象中的幻灯片 返回指定的任意文档窗口或幻灯片放映窗口中当前显示的幻灯片 新建幻灯片 返回一个以名称、索引号或幻灯片标识符指定的幻灯片
使用 Slides(index)(其中 index 为幻灯片名称或索引号)或 Slides.FindBySlideID(index)(其中 index 为幻灯片标识符)返回单个 Slide对象。以下示例设置当前演示文稿中第一张幻灯片的版式。
ActivePresentation.Slides(1).Layout = pp
更多来源:http://www.ok.xz.cn
LayoutTitle
以下示例设置标识符为 265 的幻灯片的版式。
ActivePresentation.Slides.FindBySlideID(265).Layout = ppLayoutTitle返回所选对象中的幻灯片
使用 Selection.SlideRange(index) 返回单个 Slide对象,其中 index 为所选对象中的幻灯片名称或索引号。以下示例设置当前窗口的所选对象中第一张幻灯片的版式(假设至少选定一张幻灯片)。
ActiveWindow.Selection.SlideRange(1).Layout = ppLayoutTitle
如果只选定了一张幻灯片,可以使用 Selection.SlideRange 返回包含选定幻灯片的 SlideRange集合。以下示例设置当前窗口当前所选对象中第一张幻灯片的版式(假设正好只选定一张幻灯片)。
ActiveWindow.Selection.SlideRange.Layout = ppLayoutTitle返回指定的任意文档窗口或幻灯片放映窗口中当前显示的幻灯片
使用 Slide属性返回指定文档窗口或幻灯片放映窗口视图中当前显示的幻灯片。以下示例将第二个文档窗口中当前显示的幻灯片复制到剪贴板。
Windows(2).View.Slide.Copy新建幻灯片
使用 Add方法新建幻灯片并添加到演示文稿中。以下示例在当前演示文稿的开头添加一个标题幻灯片。
ActivePresentation.Slides.Add 1, ppLayoutTitleOnly