Página 1 de 1
Imprimir dados de listview
Enviado: Seg Jul 15, 2019 9:08 pm
por Diego Shimizu
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
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 9:53 am
por Reinaldo
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
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 10:08 am
por Diego Shimizu
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?
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 10:14 am
por Reinaldo
Não entendi?
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 10:37 am
por Diego Shimizu
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...)
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 1:58 pm
por Reinaldo
Continuo sem entender.
PrintPreview "mostra" o layout de impressão, não a planilha objeto de sua imagem.
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 2:11 pm
por Diego Shimizu
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.
Re: Imprimir dados de listview
Enviado: Ter Jul 16, 2019 2:52 pm
por Reinaldo
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