Aplica-se a
|
Objeto Printer |
Devolve ou define uma constante AcPrintPaperSize a indicar o tamanho do papel a utilizar quando imprimir o documento. De leitura/escrita.
|
O AcPrintPaperSize pode ser uma das constantes do AcPrintPaperSize. |
|
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 |
expressão.PaperSize
expressão Obrigatório. Uma expressão que devolve um dos objetos na lista Aplica-se A.
Exemplo
O exemplo seguinte define uma variedade de definições da impressora para o formulário especificado no argumento strFormname do procedimento.
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
