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.

Area de impressão

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
TIAGOIM
Acabou de chegar
Acabou de chegar
Mensagens: 2
Registrado em: Qui Mai 02, 2019 8:43 am

Area de impressão

Mensagem por TIAGOIM » Qui Mai 02, 2019 8:51 am

Prezados,
Tenho uma planilha, a "livro diário" o qual é alimentada pela "lançamentos".
Após a conclusão do uso da planilha "lançamentos", será necessário apenas preparar a planilha livro diário para impressão. A quantidade de linhas na planilha "livro diário" está no intervalo "A7:F4002", porém nem todas as células são utilizadas. Todo o intervalo "A7:F4002" tem fórmulas. O meu objetivo é definir a área de impressão da planilha livro diário conforme o auto filtro, desmarcando as linhas vazias e ficando somente as células preenchidas conforme os dados oriundos da planilha "lançamentos". Não sei se é possivel fazer isso, mas como o vba possui muitos recursos acredito que alguém com conhecimentos aprofundados sobre o assunto para fazer. Desde já agradeço pela atenção
Anexos
Pasta1.zip
(224.54 KiB) Baixado 21 vezes



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.


Julio Mangilli
Colaborador
Colaborador
Mensagens: 66
Registrado em: Sex Out 05, 2018 2:42 pm

Re: Area de impressão

Mensagem por Julio Mangilli » Seg Jun 10, 2019 10:34 am

Tente usar um critério do próprio filtro antes de imprimir como:
ActiveSheet.Range("$A$6:$F$4003").AutoFilter Field:=4, Criteria1:="<>"

Retirando as células vazias

Pode fazer uma nova
Sub filtrar ()
ActiveSheet.Range("$A$6:$F$4003").AutoFilter Field:=4, Criteria1:="<>"
End sub

depois dentro de sua macro você coloca lá
Call Filtrar

Ou coloca a própria linha, tente isso.



TIAGOIM
Acabou de chegar
Acabou de chegar
Mensagens: 2
Registrado em: Qui Mai 02, 2019 8:43 am

Re: Area de impressão

Mensagem por TIAGOIM » Seg Jun 10, 2019 1:23 pm

Certo. Grato pela resposta.



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