Aplicável a
Objeto Printer |
Retorna ou define uma constante AcPrintPaperSize indicando o tamanho do papel usado para impressão. Leitura/gravação.
AcPrintPaperSize pode ser uma destas constantes de 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ória. Uma expressão que retorna um dos objetos na lista Aplica-se a.
Exemplo
O exemplo a seguir define uma variedade de configurações de impressão 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