PageHeight Property Example

This example sets the page height for the active document to 9 inches.

With ActiveDocument.PageSetup
    .PageHeight = InchesToPoints(9)
    .PageWidth = InchesToPoints(7)
End With