This example arranges all open windows so that they don't overlap.
Windows.Arrange ArrangeStyle:=wdTiled
This example minimizes all open windows and then arranges the minimized windows.
For Each aWindow In Windows
aWindow.Activate
aWindow.WindowState = wdWindowStateMinimize
Next aWindow
Windows.Arrange ArrangeStyle:=wdIcons