This documentation is archived and is not being maintained.

PaperBin Property [Access 2003 VBA Language Reference]

Office 2003

AcPrintPaperBin can be one of these AcPrintPaperBin constants.
acPRBNAuto
acPRBNCassette
acPRBNEnvelope
acPRBNEnvManual
acPRBNFormSource
acPRBNLargeCapacity
acPRBNLargeFmt
acPRBNLower
acPRBNManual
acPRBNMiddle
acPRBNSmallFmt
acPRBNTractor
acPRBNUpper

expression.PaperBin

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

Example

The following example sets a variety of printer settings for the form specified in the strFormname argument of the procedure.

Sub SetPrinter(strFormname As String)

    DoCmd.OpenForm FormName:=strFormname, view:=acDesign, _
                   datamode:=acFormEdit, windowmode:=acHidden
    
    With Forms(form1).Printer
    
        .TopMargin = 1440
        .BottomMargin = 1440
        .LeftMargin = 1440
        .RightMargin = 1440
    
        .ColumnSpacing = 360
        .RowSpacing = 360
    
        .ColorMode = acPRCMColor
        .DataOnly = False
        .DefaultSize = False
        .ItemSizeHeight = 2880
        .ItemSizeWidth = 2880
        .ItemLayout = acPRVerticalColumnLayout
        .ItemsAcross = 6
    
        .Copies = 1
        .Orientation = acPRORLandscape
        .Duplex = acPRDPVertical
        .PaperBin = acPRBNAuto
        .PaperSize = acPRPSLetter
        .PrintQuality = acPRPQMedium
    
    End With
    
    DoCmd.Close objecttype:=acForm, objectname:=strFormname, _
                Save:=acSaveYes


End Sub

		


Applies to | Printer Object



Show: