Window.UsableWidth Property (Word)
Returns the width (in points) of the active working area in the specified document window. Read-only Long.
Syntax
expression .UsableWidth
expression An expression that returns a Window object.
Remarks
If none of the working area is visible in the document window, UsableWidth returns 1. To determine the actual available height, subtract 1 from the UsableWidth value.
Example
This example displays the size of the working area in the active document window.
With ActiveDocument.ActiveWindow
MsgBox "Working area height = " _
& .UsableHeight & vbLf _
& "Working area width = " _
& .UsableWidth
End With