expression.WrapToWindow
expression Required. An expression that returns a View object.
Remarks
This property has no effect in print layout or Web layout view.
Example
This example wraps the text to fit within the active window.
With ActiveDocument.ActiveWindow.View
.Type = wdNormalView
.WrapToWindow = True
End With