HorizontalGap Property

Microsoft Publisher Visual Basic

expression.HorizontalGap

expression    Required. An expression that returns one of the objects in the Applies To list.

Remarks

This property applies only to publications where multiple pages will be printed on each printer sheet. Using this property for any other publication will generate an error.

When used with the Label object, the HorizontalGap property is read/write only when accessed from .PageSetup.Label. Otherwise, it is read-only.

Example

The following example sets the horizontal distance between publication pages that will be printed on the same sheet to 96 points.

Sub SetHorizontalGap()
    With ActiveDocument.PageSetup
        .PageHeight = InchesToPoints(8)
        .PageWidth = InchesToPoints(4)
        .MultiplePagesPerSheet = True
        .HorizontalGap = InchesToPoints(0.5)
    End With
End Sub