Returns a object that represents the presentation open in the active window. Read-only.Note that if an embedded presentation is in-place active, the ActivePresentation property returns the embedded presentation.

Syntax

expression.ActivePresentation

expression A variable that represents an Application object.

Return Value
Presentation

Example

This example saves the loaded presentation to the application folder in a file named "TestFile."

Visual Basic for Applications 
MyPath = Application.Path & "\TestFile" Application.ActivePresentation.SaveAs MyPath

See also: