Share via

HorizontalGap Property [Publisher 2003 VBA Language Reference]

  • Article

Returns or sets a Variant indicating the distance between the right edge of the publication page and left edge of the next publication page in the same row. Numeric values are evaluated as points; string values may be in any unit supported by Publisher (for example, "2.5 in"). Valid range is zero to the difference between the sheet width and the page width. Read/write.

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

Applies to | Label Object | PageSetup Object