UsableWidth Property

Application object: Returns the maximum width (in points) to which you can set the width of a Microsoft Word document window. Read-only Long.

Window object: Returns the width (in points) of the active working area in the specified document window. Read-only Long. 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 sets the size of the active document window to one quarter of the maximum allowable screen area.

With ActiveDocument.ActiveWindow
    .WindowState = wdWindowStateNormal
    .Top = 5
    .Left = 5
    .Height = (Application.UsableHeight*0.5)
    .Width = (Application.UsableWidth*0.5)
End With
		

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