BookFoldPrinting Property

expression.BookFoldPrinting

expression    Required. An expression that returns a PageSetup object.

Example

This example turns the active document into a booklet that prints in four-page increments.

Sub Booklet()
    With PageSetup
        .BookFoldPrinting = True
        .BookFoldPrintingSheets = 4
    End With
End Sub