Share via


PrintableRect Property [Publisher 2003 VBA Language Reference]

Returns a PrintableRect object that represents the printer sheet area within which the specified printer will print. Read-only.

expression.PrintableRect()

expression Required. An expression that returns an AdvancedPrintOptions object.

Remarks

The printable rectangle is determined by the printer based on the sheet size specified. The printable rectangle of the printer sheet should not be confused with the area within the margins of the publication page; it may be larger or smaller than the publication page.

Note  In cases in which the printer sheet and the publication page size are identical, the publication page is centered on the printer sheet and none of the printer's marks print, even if they are selected.

Example

The following example returns printable rectangle boundaries for the printer sheet of the active publication.

Sub ListPrintableRectBoundaries()

With ActiveDocument.AdvancedPrintOptions.PrintableRect

    Debug.Print "Printable area is " & _
            PointsToInches(.Width) & _
            " by " & PointsToInches(.Height) & " inches."
    Debug.Print "Left Boundary: " & PointsToInches(.Left) & _
                    " inches (from left)."
    Debug.Print "Right Boundary: " & PointsToInches(.Left + .Width) & _
                    " inches (from left)."
    Debug.Print "Top Boundary: " & PointsToInches(.Top) & _
                    " inches(from top)."
    Debug.Print "Bottom Boundary: " & PointsToInches(.Top + .Height) & _
                    " inches(from top)."
    
End With

End Sub

Applies to | AdvancedPrintOptions Object