MultiplePagesPerSheet Property

True for Microsoft Publisher to print multiple pages onto a single sheet. Read/write Boolean.

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

Remarks

If the page size is greater than half the paper size, Publisher will display an error.

Example

This example sets the active publication to print multiple pages on a single sheet when printing the publication.

Sub SetLeftMargin()
    With ActiveDocument.PageSetup
        .PageHeight = InchesToPoints(5)
        .PageWidth = InchesToPoints(8)
        .MultiplePagesPerSheet = True
        .LeftMargin = InchesToPoints(0.25)
    End With
End Sub