Notifications
Clear all

Impressão de Listbox

6 Posts
3 Usuários
0 Reactions
1,437 Visualizações
(@xandrinho)
Posts: 0
Estimable Member
Topic starter
 

Amigos estou com uma tremenda dúvida:
Preciso imprimir os dados constantes em uma listbox. Poderiam por favor, me orientar?
Antecipadamente, Obrigado!!!!

 
Postado : 11/02/2016 1:49 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

- Na tela do formulário, duploclique no botão imprimir
- Cole:

userform1.PrintForm

Prontinho

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

 
Postado : 11/02/2016 2:43 pm
(@xandrinho)
Posts: 0
Estimable Member
Topic starter
 

Fernando, Primeiramente mto obrigado pela atenção, esta quase, lá...a sua dica deu certo, porem qdo acionada, imprimi em retrato, precisaria imprimir em paisagem...Se tratando de imprimir o form, seria possível, imprimi em paisagem?

 
Postado : 12/02/2016 4:20 am
fcarlosc
(@fcarlosc)
Posts: 453
Honorable Member
 

Bom-dia,
Dá uma olhada nesse --> http://www.macoratti.net/printer.htm

Dim imp as Printer
For Each imp In Printers
If imp.Orientation = vbPRORLandscape then
'seleciona a impressora padrao
set printer = imp
exit for
endif
Next

 
Postado : 12/02/2016 6:13 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

o código do Carlos não vai funcionar *(e ele não testou).
Seguinte, não tem como fazer isso num formulário do Excel, usando VBA. Digo isso pq o objeto do tipo Userform não tem propriedades específicas de impressão, como as planilhas *(worksheets) tem.

Vc precisará entrar manualmente nas propriedades da impressora, mudar o padrão de impressão para paisagem. Depois vc volta no Excel e imprime o formulário.
Dps vc volta na impressora e muda de volta para retrato.
Em principio o jeito mais fácil por eqto é esse.

Não existe como manipular as propriedades de impressão de um formulário do Excel usando o VBA.
É sabido que o Windows oferece uma série de APIs, talvez por alguma delas seja possível manipular a impressora. Eu procurei e não encontrei.
O único meio possível que eu imagino é por esse caminho. Mas eu sugiro que ao invés de perder tempo indo atrás, aceite a impressão em Retrato mesmo!

FF

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

 
Postado : 12/02/2016 8:35 am
(@xandrinho)
Posts: 0
Estimable Member
Topic starter
 

Mto Obrigado pela atenção.

Valeu msm.

 
Postado : 12/02/2016 9:04 am