transform all windows into icons : Windows « Application « VBA / Excel / Access / Word






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

 








Related examples in the same category

1.How to arrange the windows: as icons (wdIcons, 1) or tiled (wdTiled, 0). The default is wdTiled.
2.Working with the Active Window
3.Arranging and Resizing Windows: ppWindowMaximized, ppWindowMinimized, or ppWindowNormal.
4.Closing a Window
5.Split windows