NewWindow Method Example

This example posts a message that indicates the number of windows that exist before and after you open a new window for Document1.

MsgBox Windows.Count & " windows open"
Windows("Document1").NewWindow
MsgBox Windows.Count & " windows open"

This example opens a new window, arranges all the open windows, closes the new window, and then rearranges the open windows.

Set myWindow = NewWindow
Windows.Arrange ArrangeStyle:=wdTiled
myWindow.Close
Windows.Arrange ArrangeStyle:=wdTiled