Application 对象

         
Application
多个对象

代表整个 Microsoft PowerPoint 应用程序。Application 对象包括:

使用 Application 对象

使用 Application 属性返回 Application 对象。以下示例返回应用程序文件的路径。

Dim MyPath As String
MyPath = Application.Path

以下示例在其他应用程序中创建一个 PowerPoint Application 对象,并启动 PowerPoint(如果还未运行的话),然后打开一个名为“Ex_a2a.ppt”的现有演示文稿。

Set ppt = New Powerpoint.Application
ppt.Visible = True
ppt.Presentations.Open "c:\My Documents\ex_a2a.ppt"

说明

编写要在 PowerPoint 中运行的编码时,以下 Application 对象的属性可以在没有对象限定符的情况下使用:ActivePresentationActiveWindowAddInsAssistantCommandBarsPresentationsSlideShowWindowsWindows。例如,可以用 ActiveWindow.Height = 200 来代替 Application.ActiveWindow.Height = 200