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