Mega Code Archive

 

Categories / VisualBasic Script / Powerpoint

 

Closing a Window

Sub close()     Do While ActivePresentation.Windows.Count > 1         ActivePresentation.Windows(ActivePresentation.Windows.Count).Close     Loop End Sub