Class Application (PowerPoint VBA)

The class Application represents the entire Microsoft PowerPoint application.

The main procedure of class Application is Activate


Some procedures in this class have been grouped together in themes and are described on separate theme pages

Password/Protect with its procedures ActiveProtectedViewWindow and ProtectedViewWindows
Name with its procedures Caption and Name
Display/Show with its procedures DisplayAlerts, DisplayDocumentInformationPanel, DisplayGridLines, DisplayGuides, ShowStartupDialog, ShowWindowsInTaskbar and SlideShowWindows
Format with its procedures Height, SmartArtColors, SmartArtLayouts, SmartArtQuickStyles, Visible and Width


This is the main method of the Application class

Activate - Activates the specified object.


Other Methods

Help - Displays a Help topic.


Run - Runs a Visual Basic procedure.

Dim strMacroName As String: strMacroName = "TestPass"
Dim varsafeArrayOfParams(1 To 2) As Variant
varsafeArrayOfParams(1) = "hi"
varsafeArrayOfParams(2) = 7 
Application.Run(MacroName:=strMacroName, safeArrayOfParams:=varsafeArrayOfParams)


Active returns whether the specified pane or window is active.

Dim mtsActive As Office.MsoTriState
mtsActive = Application.Active

ActiveEncryptionSession represents the encryption session associated with the active presentation.

Dim lngActiveEncryptionSession As Long
lngActiveEncryptionSession = Application.ActiveEncryptionSession

ActivePresentation returns a Presentation object that represents the presentation open in the active window.

Dim prsActivePresentation As Presentation
Set prsActivePresentation = ActivePresentation

ActivePrinter returns the name of the active printer.

Dim strActivePrinter As String
strActivePrinter = Application.ActivePrinter

ActiveWindow returns a DocumentWindow object that represents the active document window.

Dim dwwActiveWindow As DocumentWindow
Set dwwActiveWindow = ActiveWindow

AddIns returns the program-specific AddIns collection that represents all the add-ins listed in the Add-Ins dialog box (click the Office button, click PowerPoint Options, click Add-Ins, click PowerPoint Add-Ins on the Manage list).

Dim aisAddIns As AddIns
Set aisAddIns = AddIns

Assistance gets a reference to the Microsoft Office IAssistance object, which provides a means for developers to create a customized help experience for users within Microsoft Office.

Dim iaeAssistance As Office.IAssistance
Set iaeAssistance = Application.Assistance

AutoCorrect returns an AutoCorrect object that represents the AutoCorrect functionality in Microsoft PowerPoint.

Dim actAutoCorrect As AutoCorrect
Set actAutoCorrect = Application.AutoCorrect

AutomationSecurity represents the security mode that Microsoft PowerPoint uses when it opens files programmatically.

Application.AutomationSecurity = msoAutomationSecurityLow

Build returns the build number for the current instance of Microsoft PowerPoint.

Dim strBuild As String
strBuild = Application.Build

ChartDataPointTrack returns or sets a Boolean that specifies whether charts use cell-reference data-point tracking.

Application.ChartDataPointTrack = True

COMAddIns returns a reference to the Component Object Model (COM) add-ins currently loaded in Microsoft PowerPoint. These add-ins are listed on the Add-Ins tab in the PowerPoint Options dialog box.

Dim comsCOMAddIns As Office.COMAddIns
Set comsCOMAddIns = Application.COMAddIns

CommandBars returns a CommandBars collection that represents all the command bars in Microsoft PowerPoint.

Dim cbsCommandBars As Office.CommandBars
Set cbsCommandBars = CommandBars

FeatureInstall returns or sets how Microsoft PowerPoint handles calls to methods and properties that require features not yet installed.

Application.FeatureInstall = msoFeatureInstallNone

FileConverters returns information about installed file converters. Returns null if there are no converters installed.

Dim fcsFileConverters As FileConverters
Set fcsFileConverters = FileConverters

FileDialog returns a FileDialog object that represents a single instance of a file dialog box.

Dim fdgFileDialog As Office.FileDialog
Set fdgFileDialog = Application.FileDialog(Type:=msoFileDialogOpen)

FileValidation returns or sets a value that indicates how PowerPoint will validate files before opening them. Read/write

Application.FileValidation = msoFileValidationDefault

IsSandboxed returns True if the specified presentation is open in a Protected View window.

Dim booIsSandboxed As Boolean
booIsSandboxed = IsSandboxed

LanguageSettings returns a LanguageSettings object that contains information about the language settings in Microsoft PowerPoint.

Dim lssLanguageSettings As Office.LanguageSettings
Set lssLanguageSettings = Application.LanguageSettings

Left returns or sets a Single that represents the distance in points from the left edge of the document, application, and slide show windows to the left edge of the application window's client area. Setting this property to a very large positive or negative value may position the window completely off the desktop.

Application.Left =


Dim nfeNewPresentation As Office.NewFile
Set nfeNewPresentation = Application.NewPresentation

OperatingSystem returns the name of the operating system.

Dim strOperatingSystem As String
strOperatingSystem = Application.OperatingSystem

Options returns an Options object that represents application options in Microsoft PowerPoint.

Dim optsOptions As Options
Set optsOptions = Application.Options

Path returns a String that represents the path to the specified Application object.

Dim strPath As String
strPath = Application.Path

Presentations returns a Presentations collection that represents all open presentations.

Dim prsPresentations As Presentations
Set prsPresentations = Presentations

ProductCode returns the Microsoft PowerPoint globally unique identifier (GUID).

Dim strProductCode As String
strProductCode = Application.ProductCode


Dim slpSensitivityLabelPolicy As Office.SensitivityLabelPolicy
Set slpSensitivityLabelPolicy = Application.SensitivityLabelPolicy

Top returns or sets a Single that represents the distance in points from the top edge of the document, application, and slide show window to the top edge of the application window's client area.

Application.Top = 100

VBE returns a VBE object that represents the Visual Basic Editor.

Set vbeVBE = Application.VBE

Version returns the Microsoft PowerPoint version number.

Dim strVersion As String
strVersion = Application.Version

Windows returns a DocumentWindows collection that represents all open document windows.

Dim dwsWindows As DocumentWindows
Set dwsWindows = Windows

WindowState returns or sets the state of the specified window.

Application.WindowState = ppWindowMaximized