Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
Por Diego100ges
Posts
#41523
Bom dia pessoal!
Estou com uma grande dificuldade aqui, tenho uma planilha com ID, DATA, E VALOR, e gostaria de fazer um filtro entre 2 datas, uma data inicial e uma data final, para que seja possível filtrar pelo período desejado, acredito que a melhor forma seja por VBA, porém não estou conseguindo, será que alguém consegue me dar uma força aqui?

Obrigado!
Você não está autorizado a ver ou baixar esse anexo.
Por osvaldomp
#41529
Experimente:
Código: Selecionar todos
Sub FiltroEntreDatas()
 ActiveSheet.[A3:C3].AutoFilter 2, ">=" & Format([G3], "mm/dd/yyyy"), xlAnd, "<=" & Format([I3], "mm/dd/yyyy")
End Sub
Por Diego100ges
Posts
#41535
Amigo, funcionou perfeitamente!
Tem como incluir para que se os campos de data inicial e data final estiverem vazio, ele mostrar todas as datas? porque no caso acima, quando eu executo a macro com esses campos vazios não aparece nenhuma data.
Ou uma outra macro para reverter a primeira, seria sensacional.
Muito obrigado!
Por osvaldomp
#41537
Diego100ges escreveu: Tem como incluir para que se os campos de data inicial e data final estiverem vazio, ele mostrar todas as datas? porque no caso acima, quando eu executo a macro com esses campos vazios não aparece nenhuma data.
Segue abaixo a "solução" embora eu não veja sentido na sua lógica.
Se você não preencheu os critérios isso significa que você não pretende filtrar, ora, se você não pretende filtrar, porque então rodar o código para filtrar?
Se você não quer filtrar, simplesmente não rode o código.
Código: Selecionar todos
Sub FiltroEntreDatas()
 If [G3] = "" Or [I3] = "" Then Exit Sub
 ActiveSheet.[A3:C3].AutoFilter 2, ">=" & Format([G3], "mm/dd/yyyy"), xlAnd, "<=" & Format([I3], "mm/dd/yyyy")
End Sub
Por Diego100ges
Posts
#41538
Osvaldo, seria para "desfiltrar" o que foi filtrado para eu poder ver todos os dados novamente

Muito obrigado pela sua ajuda!
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord