WrapToWindow Property Example
This example wraps the text to fit within the active window.
With ActiveDocument.ActiveWindow.View .Type = wdNormalView .WrapToWindow = True End With