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 dados de listview

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Diego Shimizu
Colaborador
Colaborador
Mensagens: 12
Registrado em: Sex Jul 12, 2019 2:44 pm

Imprimir dados de listview

Mensagem por Diego Shimizu » Seg Jul 15, 2019 9:08 pm

Pessoal, boa noite.

Estou abrindo um novo tópico para esclarecer a dúvida postada no tópico abaixo:

https://www.tomasvasquez.com.br/forum/v ... dfc#p27481

Quando seleciono o item que desejo imprimir e clico no botão "Imprimir", a tela com as opções de impressão é exibida no fundo do userform, deixando o arquivo "congelado". Alguém poderia me ajudar com situação?

Segue link do arquivo: https://drive.google.com/file/d/1MEU5sv ... sp=sharing



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
Reinaldo
Jedi
Jedi
Mensagens: 1271
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Imprimir dados de listview

Mensagem por Reinaldo » Ter Jul 16, 2019 9:53 am

Experimente ocultando temporariamente o userform e depois o reexibindo
inclua as linhas me.hide e me.show conforme abaixo

Código: Selecionar todos

        Next a
    Me.Hide
            Sheets("Impressão").Range("A1:J" & Count + 1).PrintPreview
    End If
 Me.Show
Exit Sub


Reinaldo
Gostou da resposta?:?: :oops: :D :mrgreen:

Diego Shimizu
Colaborador
Colaborador
Mensagens: 12
Registrado em: Sex Jul 12, 2019 2:44 pm

Re: Imprimir dados de listview

Mensagem por Diego Shimizu » Ter Jul 16, 2019 10:08 am

Obrigado Reginaldo, é quase isso.
Visto que o cabeçalho da tabela está configurado para ficar oculto por padrão, existe um comando para exibi-lo somente na tela de impressão e após ocultá-lo novamente?



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1271
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Imprimir dados de listview

Mensagem por Reinaldo » Ter Jul 16, 2019 10:14 am

Não entendi?


Reinaldo
Gostou da resposta?:?: :oops: :D :mrgreen:

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.


Diego Shimizu
Colaborador
Colaborador
Mensagens: 12
Registrado em: Sex Jul 12, 2019 2:44 pm

Re: Imprimir dados de listview

Mensagem por Diego Shimizu » Ter Jul 16, 2019 10:37 am

Por padrão, minhas planilhas do Excel estão definidas para ocultar a faixa de opções e comandos (Vide imagem anexa).

Ao clicar em imprimir, a janela de visualização é exibida com esta barra oculta. Eu teria que exibi-la manualmente para obter acesso as configurações de impressão, o que não é uma grande dificuldade. Porém, visto que este documento será utilizado por outras pessoas, algumas com conhecimento mais limitado que o meu (rsrsrsrs), existe um modo de a janela de visualização de impressão ser aberta já com a faixa de opções e comandos visível? (Não sei se ficou claro...)
Anexos
Excel.png
Excel.png (54.86 KiB) Exibido 524 vezes



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1271
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Imprimir dados de listview

Mensagem por Reinaldo » Ter Jul 16, 2019 1:58 pm

Continuo sem entender.
PrintPreview "mostra" o layout de impressão, não a planilha objeto de sua imagem.


Reinaldo
Gostou da resposta?:?: :oops: :D :mrgreen:

Diego Shimizu
Colaborador
Colaborador
Mensagens: 12
Registrado em: Sex Jul 12, 2019 2:44 pm

Re: Imprimir dados de listview

Mensagem por Diego Shimizu » Ter Jul 16, 2019 2:11 pm

Bom, vamos lá.

Minha planilha está configurada para não exibir os menus. Com isso, quando a printpreview exibe o documento que mandei imprimir, os menus de opção ficam ocultos. Para que sejam exibidos, eu preciso habilitar manualmente a exibição do menu de comandos. Quando faço isso, a tela do printpreview exibe os comandos. O que quero é uma função para fazer essa exibição por meio de macro, e não manualmente. Abaixo, imagens da tela do printpreview pra exemplificar.

Caso entenda que a opção print é mais interessantes, inclusive com a opção de selecionar a impressora deseja, poderá aplicá-la também.
Anexos
Sem título.png
Sem título.png (25.71 KiB) Exibido 512 vezes



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1271
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Imprimir dados de listview

Mensagem por Reinaldo » Ter Jul 16, 2019 2:52 pm

Código: Selecionar todos

        Next a
    Me.Hide
            Application.DisplayFullScreen = False
            Sheets("Impressão").Range("A1:J" & Count + 1).PrintPreview
    End If
            Application.DisplayFullScreen = True
Me.Show
Exit Sub


Reinaldo
Gostou da resposta?:?: :oops: :D :mrgreen:

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