Working with the Active Presentation : ActivePresentation « PowerPoint « VBA / Excel / Access / Word






Working with the Active Presentation

 
'Check that a window is open before you access the ActivePresentation object. 
Sub count()
    If Windows.Count = 0 Then
        MsgBox "Please open a presentation before running this macro."
        End
    End If
End Sub

 








Related examples in the same category

1.Closing a Window
2.Use the Save method to save a presentation before closing its last window
3.Check the Path property of the Presentation object before using the Save method if you need to determine whether the presentation has been saved
4.Saving a Copy of a Presentation