Sign in with Microsoft
Sign in or create an account.
Hello,
Select a different account.
You have multiple accounts
Choose the account you want to sign in with.

Applies to

Printer Object

Returns or sets an AcPrintPaperSize constant indicating the paper size to use when printing. Read/write.

AcPrintPaperSize can be one of these AcPrintPaperSize constants.

acPRPS10x14

acPRPS11x17

acPRPSA3

acPRPSA4

acPRPSA4Small

acPRPSA5

acPRPSB4

acPRPSB5

acPRPSCSheet

acPRPSDSheet

acPRPSEnv10

acPRPSEnv11

acPRPSEnv12

acPRPSEnv14

acPRPSEnv9

acPRPSEnvB4

acPRPSEnvB5

acPRPSEnvB6

acPRPSEnvC3

acPRPSEnvC4

acPRPSEnvC5

acPRPSEnvC6

acPRPSEnvC65

acPRPSEnvDL

acPRPSEnvItaly

acPRPSEnvMonarch

acPRPSEnvPersonal

acPRPSESheet

acPRPSExecutive

acPRPSFanfoldLglGerman

acPRPSFanfoldStdGerman

acPRPSFanfoldUS

acPRPSFolio

acPRPSLedger

acPRPSLegal

acPRPSLetter

acPRPSLetterSmall

acPRPSNote

acPRPSQuarto

acPRPSStatement

acPRPSTabloid

acPRPSUser

expression.PaperSize

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

Need more help?

Want more options?

Explore subscription benefits, browse training courses, learn how to secure your device, and more.

Communities help you ask and answer questions, give feedback, and hear from experts with rich knowledge.

Was this information helpful?

What affected your experience?
By pressing submit, your feedback will be used to improve Microsoft products and services. Your IT admin will be able to collect this data. Privacy Statement.

Thank you for your feedback!

×