How to arrange the windows: as icons (wdIcons, 1) or tiled (wdTiled, 0). The default is wdTiled.
Sub arrange() Windows.arrange ArrangeStyle:=wdTiled End Sub