Application.ActivePresentation property (PowerPoint)
Returns a Presentation object that represents the presentation open in the active window. Read-only.
expression A variable that represents an Application object.
If an embedded presentation is in-place active, the ActivePresentation property returns the embedded presentation.
This example saves the loaded presentation to the application folder in a file named "TestFile."
MyPath = Application.Path & "\TestFile" Application.ActivePresentation.SaveAs MyPath
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.