Notifications
Clear all

Alterar macro imprimir

3 Posts
2 Usuários
0 Reactions
1,070 Visualizações
(@marco-acv)
Posts: 0
New Member
Topic starter
 

Prezados, bom dia!

Eu tenho uma macro para imprimir uma planilha,

Sub IMPRIMIR()
'
' IMPRIMIR Macro
'

'
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
End Sub

porém essa macro imprime direto (não permite o usuário escolher qual impressora ele gostaria de usar).

Tem como alterar essa macro para que exista essa opção? Tipo assim: activewindow “selecione uma impressora

Desde já agradeço pela atenção de todos!

Atenciosamente,
Marco

 
Postado : 02/05/2017 7:20 am
(@mprudencio)
Posts: 0
New Member
 

Tente assim

Sub Imprimir()

Application.Dialogs(xlDialogPrint).Show
 
End Sub
 
Postado : 02/05/2017 8:11 am
(@marco-acv)
Posts: 0
New Member
Topic starter
 

Olá, bom dia!

Deu certo :D :D :D

Muito obrigado pela atenção.

Atenciosamente,
Marco

 
Postado : 02/05/2017 8:18 am