Application.ActivePresentation Property (PowerPoint)
Returns a Presentation object that represents the presentation open in the active window. Read-only.
Syntax
expression .ActivePresentation
expression A variable that represents an Application object.
Return Value
Presentation
Remarks
If an embedded presentation is in-place active, the ActivePresentation property returns the embedded presentation.
Example
This example saves the loaded presentation to the application folder in a file named "TestFile."
MyPath = Application.Path & "\TestFile"
Application.ActivePresentation.SaveAs MyPath