Windows Property Example

This example displays the number of windows for the active document, both before and after the NewWindow method is run.

MsgBox Prompt:= ActiveDocument.Windows.Count & " window(s)", _
    Title:= ActiveDocument.Name
ActiveDocument.ActiveWindow.NewWindow
MsgBox Prompt:= ActiveDocument.Windows.Count & " windows", _
    Title:= ActiveDocument.Name

This example arranges all open windows so that they don't overlap.

Windows.Arrange ArrangeStyle:=wdTiled