Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Closing a Window
Sub close()
    Do While ActiveWorkbook.Windows.Count > 1
        ActiveWorkbook.Windows(myWorkbook.Windows.Count).Close
    Loop
End Sub