Returns or sets a Variant that represents the height of the pages in a publication. Read/write.
expression.PageHeight
expression Required. An expression that returns one of the objects in the Applies To list.
This example specifies a height of five inches for the pages in the active publication.
Sub SetLeftMargin() With ActiveDocument.PageSetup .PageHeight = InchesToPoints(5) .PageWidth = InchesToPoints(8) .MultiplePagesPerSheet = True .LeftMargin = InchesToPoints(0.25) End With End Sub