与Word和Excel类似，PowerPoint的对象模型也是以Application为顶级对象的树形结构。主要对象的关系层次为：Application对象—Presentations对象（演示文稿对象集合）—Presentation对象（演示文稿对象）—Slides对象（幻灯片对象集合）—Slide对象（幻灯片对象）、Master对象（母版对象）—Shapes对象（形状对象集合）—Shape对象（形状对象）。
1．Application对象
PowerPoint的Application对象就是PowerPoint应用程序本身，为PowerPoint中的顶级对象，通过Application可以访问应用中的其他所有对象。[3]
编写要在PowerPoint中运行的代码时，Application对象的下列属性可以在没有对象限定符的情况下使用：ActivePresentation、ActiveWindow、AddIns、Presentations、 SlideShowWindows、Windows。
（1）PowerPoint的Application对象的属性与说明见表24-9：
表24-9 PowerPoint中Application对象的属性与说明
另外，SmartArt图形的颜色、布局和快速样式也是Application对象的属性。
（2）常用的方法有：
Activate方法：激活指定对象。
Quit方法：退出应用程序。
2．Presentations/Presentation对象
Presentations/Presentation对象代表打开的演示文稿集合和演示文稿对象。
（1）Presentations/Presentation对象的属性与说明见表24-10：
表24-10 PowerPoint中Presentations/Presentation对象的属性与说明
（2）常用的方法有：
Presentations.Add方法：创建一个空演示文稿，并将其加入演示文稿集合。
ApplyTemplate方法：对演示文稿应用设计模板。
Save方法：保存演示文稿。
SaveAs方法：指另存为。
此外，我们在这里列举三种在现实中常见的实例：
（1）实例1：使用下列语句创建一个新演示文稿，并赋值给一个变量NewPres。
Dim NewPres As Presentation
Set NewPres As Presentations.Add
（2）实例2：判断当前演示文稿是否已保存。否则，保存该文档。
（3）实例3：清除演示文稿最近使用的颜色，然后添加指定颜色.
3 ．Slides/Slide对象
Slides/Slide对象分别代表某个演示文稿中的幻灯片集合与一张幻灯片。
（1）Slides/Slide对象的属性与说明见表24-11：
表24-11 PowerPoint中Slides/Slide对象的属性与说明
其中，“Layout”（幻灯片版式）属性为CustomLayout（版式）对象，一般可以从当前演示文稿的某个幻灯片中获得，也可以从“SlideMaster.CustomLayouts(index)”中获得。
（2）常用的方法有：
Slides.AddSlide(index, pCustomLayout)方法：增加幻灯片，幻灯片索引号和版式两个参数均为必须。其中，“index”为新增幻灯片的位置，“pCustomLayout”为一个CustomLayout对象。
Copy方法：将幻灯片复制到剪贴板。(www.xing528.com)
Cut方法：将幻灯片剪切到剪贴板。
Delete方法：删除幻灯片。
Slides.Paste方法：将剪贴板上的幻灯片粘贴到幻灯片集合中。
Duplicate方法：创建幻灯片副本。
Select方法：选择指定对象。
此外，我们在这里列举三种在现实中常见的实例：
（1）实例1：下列代码代表采用幻灯片母版的第三个版式，并在当前演示文稿中插入第二张幻灯片。
Set aLayout = ActivePresentation.SlideMaster.CustomLayouts(3)
Set newSlide = ActivePresentation.Slides.AddSlide(2, aLayout)
（2）实例2：删除特定幻灯片，这里的序号“6”就是幻灯片序号。
ActivePresentation.Slides(6).Delete
（3）实例3：复制当前幻灯片并粘贴到某个位置。
其中，“ActiveWindow.View.Slide”是从Application的属性直接访问当前幻灯片。
4．Shapes/Shape对象
一张幻灯片中的内容由文本框、形状、图片、表格、图表、SmartArt图形、视频、音频等组成，这些内容对象都被归为一种VBA对象——Shape对象。各个Shape对象的集合即为Shapes对象。
（1）Shapes/Shape对象的属性与说明见表24-12：
表24-12 PowerPoint中Shapes/Shape对象的属性与说明
（2）常用的方法有：
Apply方法：将Pickup复制的格式，应用到指定形状。
Shapes对象有一系列以“Add”开头的方法。例如AddTitle、AddTextbox、AddPicture、AddShape等等，均向特定的幻灯片中加入各类Shape对象。
ApplyAnimation方法：应用动画。
Copy方法：复制形状到剪贴板。
Cut方法：剪切对象。
Duplicate方法：复制形状副本。
Shapes.Paste方法：粘贴剪贴板中的形状对象，并将它加入Shapes集合。
Pickup方法：复制指定对象的格式。
Shapes.SelectAll方法：选中全部形状。
此外，我们在这里列举三种在现实中常见的实例：
（1）实例1：下列代码代表将第一个形状的格式复制后，应用到第二个形状上。
（2）实例2：在特定幻灯片中添加一个文本框。
（3）实例3：在特定幻灯片中添加一个特定形状，并使用主题色进行填充。
免责声明：以上内容源自网络，版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。
