Notifications
Clear all

Tela Userforme Na frente da visualização de Impressão

3 Posts
2 Usuários
0 Reactions
1,047 Visualizações
(@eufrasio)
Posts: 23
Eminent Member
Topic starter
 

Olá amigos!

Sou novo no fórum e na programação em VBA estou criando uma aplicação para cadastro de equipamentos aqui na minha oficina, Estou passando por dificuldades com a visualização da impressão.

Tenho o seguinte código abaixo para imprimir:

Private Sub cmdImprimir_Click()  'este é o botão imprimir

 Application.Dialogs(xlDialogPrint).Show este é o código para imprimir

End Sub 

Porém, quando pressiono a visualização de impressão a tela de cadastro fica na frente da visualização e fica como que travada. Tenha que através do gerenciador de tarefas finalizar o Excel

Também já tentei com o código:

Application.Dialogs(xlDialogPrintPreview).Show 

más da na mesma coisa.

Agradeço a atenção dos amigo que poderem me ajudar.

 
Postado : 27/08/2017 3:45 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Eufrasio,

Boa noite!

Tente assim:

Private Sub cmdImprimir_Click()  'este é o botão imprimir

 Application.Dialogs(xlDialogPrint).Show este é o código para imprimir
 Unload Me
End Sub 

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 27/08/2017 5:16 pm
(@eufrasio)
Posts: 23
Eminent Member
Topic starter
 

Boa noite Amigo!

após ter postado a dúvida aqui, dei uma pesquisada e encontrei esse código (você ainda não tinha postado a dica) abaixo postado por um amigo que funcionou perfeitamente.

'Oculta o formulário
Me.Hide

'Exibe tela de visualização de impressão
ActiveSheet.PrintPreview

'retorna ao formulário
Me.Show

Muitíssimo obrigado por sua atenção!!!

:D :D :D :D :D :D :D :D

 
Postado : 27/08/2017 7:00 pm