[Anónimo]

boa tarde galerinha!

estou precisando da seguinte ajuda.

gostaria de desfiltrar (limpar filtro) apenas se a planilha estiver filtrada.

ex.:
sub desfiltrar()
if “planilha filtrada” then
activesheet.showalldata
end if
end sub

entendeu?
aguardo uma ajuda.

att.
wagner goularte

[Albino]

olá wagner.
não sendo a pessoa mais indicada para ter dar dicas sobre o excel, pois sou mero aprendiz, mas tenho uma folha onde aplico um código que realmente desfazz o filtro anteriormente criado.
vê lá se te dá jeito.

sub removefilter()

‘remove o filtro da folha2 se este estiver activado
sheets(“folha2”).activate
if activesheet.autofiltermode = true then
activesheet.autofiltermode = false
end if
end sub

di< qqr coisa
abraço.
albino

[Anónimo]

obrigado pela ajuda albino, mas não é isso o que eu preciso.

eu não quero que retira a opção de filtro, eu quero que “desfiltre”, ou seja, limpe o filtro que estiver, mas que mantenha a planilha com a opção de filtro.

entendeu??

att.
wagner goularte

[jorgerod]

wagner,

talvez : sheets(1).autofiltermode = false

dis qq coisa, ok?

[Anónimo]

galerinha, acho que não fui claro. tentarei explicar utilizando exemplo.

eu quero que na programação, antes de fechar o arquivo, ele verifica se a planilha contem algum tipo de filtro,

– se tiver filtro: desfiltra e fecha.
– se nao tiver filtro: apenas fecha.

o que eu quero dizer com filtro.
na planilha eu seleciono os titulos de um banco de dados e crio o filtro. dados>filtro.
nesse banco de dados, suponhamos que fiz vários filtros, por data, por nome, etc… entao, a planilha ficará filtrada.
eu quero que verifique se ela está com algum filtro e “limpe todos os filtros” antes de sair.
“limpe os filtros”, “desfiltre”, “deixe o banco de dados com tds as informações”.
mas, eu quero ke o banco de dados continua com a opção de filtro.
dados>filtro.

se eu fizer autofiltermode = false, ele some essa opção.
entendeu agora??

o que eu uso hj é o seguinte, eu peço para fazer um filtro qualquer na primeira coluna e depois desfiltrar tudo. porem isso demora as vezes sem necessidade, uma vez que se a planilha já está desfiltrada, nao precisa filtrar para depois desfiltrar ..

utilizo hoje:
activesheet.range(“$a$3:$mr$2000″).autofilter field:=1, criteria1:=”0”, _
operator:=xland
activesheet.showalldata

eu gostaria de não precisar fazer essa primeira linha.
gostaria que pela programacao, ele verificasse se há algum filtro e não havendo, realiza proxima programacao.
havendo filtro, ele apenas executa
activesheet.showalldata
e depois vai para a proxima programação …

agora conseguiram entender? escrevi um monte hein .. kk

aguardo uma ajuda.
valew !!!

[Anónimo]

alguma ajuda galerinha …

se não entenderam minha dúvida, posso tentar explicar e exemplicar novamente, mas acho que escrevi bem detalhado na msg anterior.. #1296

fico no aguardo.

att.

[jorgerod]

tenta criar como tabela. se assim for, terás sempre a opção filtragem para todas as colunas…

[Anónimo]

é, pelo visto não fui bem claro…

depois crio um arquivo de exemplo e explico novamente.

mas creio que na ultima explicação eu disse tudo detalhado.

att.
wagner goularte

[saranataly]

Acredito que você já tenha resolvido seu problema.

Mas o que você queria era só limpar o filtro, não retirar. Não é?

Você pode usar AutoFilter.ShowAllData, que mostra todos dados do filtro novamente.

Estou respondendo caso alguém mais questione e encontre esse tópico.

[bernardin]

Oq na verdade ele queria era:

If activesheet.filtermode then activesheet.showalldata
Att.

• Esta resposta foi modificada há 2 anos, 11 meses por bernardin.

[Autor]

Artigos