Página 1 de 1

Selecionar impressora sem usar função (xlDialogPrinterSetup)

Enviado: 17 Abr 2018 às 17:12
por VictorCoutinho
Depois de pesquisar bastante na net, resolvi recorrer aqui mais uma vez...

Gostaria de saber como posso selecionar a impressora automaticamente sem usar a função (xlDialogPrinterSetup).
No meu arquivo uso 2 impressoras, a "Procomp" para imprimir o que está na aba "RECIBO" e a "Canon MP250" para gerar um PDF do que está na aba "1ª VIA".
Não gostaria que eu tivesse que selecionar na caixa de dialogo qual impressora usar, mas sim que em cada código "IMPRIMIR" ou "SALVARPDF" já estivesse determinado em qual impressora lançar e suas configurações como papel, orientação da página e etc...
Na planilha em anexo na aba "2ª VIA" tem mais informações dessa dúvida.

OBS: Na net achei o código " ActiveWindow.SelectedSheets.PrintOut ActivePrinter:="Nome da Impressora", mas com essa acho que não consigo determinar papel, orientação e etc, acho que imprime direto...

Re: Selecionar impressora sem usar função (xlDialogPrinterSe

Enviado: 18 Abr 2018 às 22:38
por babdallas
Segue exemplo
Código: Selecionar todos
With ActiveSheet.PageSetup
        .Orientation = xlPortrait
        .PaperSize = xlPaperA4
        .BlackAndWhite = True
End With

ActiveWindow.SelectedSheets.PrintOut ActivePrinter:="Nome da Impressora"