Notifications
Clear all

Macro para imprimir em impressora específica

2 Posts
2 Usuários
0 Reactions
1,284 Visualizações
(@pr_pxt)
Posts: 2
New Member
Topic starter
 

Senhores, boa tarde.
Pesquisei no forum mas não encontrei o que to precisando, caso tenha um tópico para minha dúvida, favor me informar.

Bom. Tenho uma planilha que preciso dar opções para imprimí-la em duas impressoras, ex:

Botão: IMPRIMIR NO ESTOQUE
Botão: IMPRIMIR NO SALÃO DE VENDAS

Tentei criar a macro fazendo passo a passo, alterando impressora, definindo página, mas os dois botoes acabam imprimindo na mesma impressora, queria que cada um imprimisse em uma diferente.
Alguem pode me ajudar?

 
Postado : 02/04/2014 11:28 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Tentei algo..

Sub Impr()
Dim bresponse As Boolean
bresponse = Application.Dialogs(xlDialogPrinterSetup).Show
If bresponse = False Then
    MsgBox "Cancela pelo usuário"
    Exit Sub
End If
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 02/04/2014 12:01 pm