Como atualizar automaticamente os resultados do Filtro Avançado no Excel?
Quando utilizamos a funcionalidade Filtro Avançado, notamos que o resultado filtrado não é atualizado automaticamente quando alteramos os critérios — sendo necessário reaplicar manualmente o Filtro Avançado para obter os novos resultados. Contudo, conhece algum truque eficaz e rápido que permita atualizar automaticamente o resultado do filtro avançado, tal como ilustrado na imagem seguinte no Excel?

Atualizar automaticamente o resultado do filtro avançado com código VBA
Atualizar automaticamente o resultado do filtro avançado com código VBA
O código VBA seguinte permite atualizar automaticamente o resultado do filtro avançado sempre que alterar os critérios, conforme necessário. Siga estes passos:
1. Clique com o botão direito no separador da folha onde pretende aplicar o filtro automático e, em seguida, escolha Ver Código no menu de contexto. Na janela Microsoft Visual Basic para Aplicações que se abre, copie e cole o seguinte código no módulo em branco:
Código VBA: Atualizar automaticamente o resultado do filtro avançado:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A5:D21").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("A1:C3"), Unique:=False
End Sub
Nota: No código acima, A5:D21 é o intervalo de dados que pretende filtrar e A1:C3 é o intervalo de critérios com base no qual efetuar o filtro.

2. Em seguida, guarde e feche a janela do código. A partir de agora, sempre que alterar os critérios no intervalo de critérios, o resultado filtrado será atualizado automaticamente em tempo real.

Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos