Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Transform all windows into icons
Sub ShowWindowsAsIcons()
  Dim win As Object
  For Each win In Windows
    If win.Visible Then win.WindowState = xlMinimized
  Next win
End Sub