DefaultHeight Property Example

This example sets the default envelope size to 4.5 inches by 7.5 inches.

With ActiveDocument.Envelope
    .DefaultHeight = InchesToPoints(4.5)
    .DefaultWidth = InchesToPoints(7.5)
End With