ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Imprimir resultado do Listbox

Dúvidas gerais sobre Excel
Guima
Consultor
Consultor
Mensagens: 242
Registrado em: Sex Out 30, 2009 6:10 am

Imprimir resultado do Listbox

Mensagem por Guima » Sex Out 30, 2009 4:58 pm

Existe um meio de imprimir diretamente o conteudo de um Listbox ? Ou a unica forma seria transferir os dados para uma planilha e de la imprimir ? Ja ate vi algumas possibilidades de imprimir direto do List , porem utilizando um BD ( o que nao eh o meu caso). Gostaria de ter ao menos uma definicao sobre o caso, pois sempre fica a incerteza...


Guilherme

Sub Guilherme_Initialize()
If Me.Guima <> "" Then
MsgBox "Obrigado pela força "
Else
MsgBox "Um abraço pra todos "
End If
End Sub

Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 2806
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Imprimir resultado do Listbox

Mensagem por webmaster » Sex Out 30, 2009 9:27 pm

Guima,

Só colocando na planilha mesmo. Diria que até dá para tirar um "print" do form, mas aí ficaríamos limitados a quantidade de itens concorda?

Abraços


Tomás
https://www.tomasvasquez.com.br/blog
https://www.tomasvasquez.com.br/cursocsharp
https://twitter.com/tomamais
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.

Neri

Re: Imprimir resultado do Listbox

Mensagem por Neri » Sex Nov 06, 2009 11:12 am

Tomas
Desculpe me meter na conversa, mas eu tenho um comando, pode ser que imprima. Veja:
Como pode ser impresso dados que estão armazanados em um Listbox
Exemplo 1:
me.Hide
ActiveWindow.SelectedSheets.PrintPreview
Me.Show

Outro exemplo

CODE for i=0 to list1.listcount-1
printer.print list1.list(i)
next i
printer.enddoc


Valeu



Avatar do usuário
webmaster
Administrador
Mensagens: 2806
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Imprimir resultado do Listbox

Mensagem por webmaster » Sex Nov 06, 2009 12:41 pm

Se meter?

Neri, este é um fórum com a intenção de ajudar. Se não servir para isso, de que valeria sua existência?

O que devo no mínimo é agradecer sua colaboração.

Abraços


Tomás
https://www.tomasvasquez.com.br/blog
https://www.tomasvasquez.com.br/cursocsharp
https://twitter.com/tomamais
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.

Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 2806
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Imprimir resultado do Listbox

Mensagem por webmaster » Sex Nov 06, 2009 12:49 pm

Neri,

Comentários sobre as dicas abaixo:

Exemplo 1
Não está faltando o código que colocar os itens do ListBox no Worksheet?

Outro Exemplo
Pelo que vi, o exemplo serve para o Visual Basic 6, onde existe a coleção Printers mencionada no código. No VBA, não funciona diretamente.

Abraços


Tomás
https://www.tomasvasquez.com.br/blog
https://www.tomasvasquez.com.br/cursocsharp
https://twitter.com/tomamais
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.

Neri

Re: Imprimir resultado do Listbox

Mensagem por Neri » Sex Nov 06, 2009 3:09 pm

De qualquer forma, para ajudar o nosso amigo Guima eu vou passar a dica que eu mesmo fiz e uso:
Os parâmetros digitados acionam o filtro avancado que envia os dados para uma planilha e esta sim, pode ser impressa.
Lembro que neste caso, o filtro é mais limitado.

Mas pode ser uma saída.

Outra maneira, enviar os dados do listbox para uma planilha e aí imprimir.




Guima
Consultor
Consultor
Mensagens: 242
Registrado em: Sex Out 30, 2009 6:10 am

Re: Imprimir resultado do Listbox

Mensagem por Guima » Sáb Nov 07, 2009 2:11 pm

Neri,

Valeu demais a força meu camarada, te devo essa !!!

[]'s


Guilherme

Sub Guilherme_Initialize()
If Me.Guima <> "" Then
MsgBox "Obrigado pela força "
Else
MsgBox "Um abraço pra todos "
End If
End Sub

Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder