Como limpar filtros ao abrir, salvar ou fechar a pasta de trabalho no Excel?

Suponha que você tenha várias planilhas contendo dados filtrados em sua pasta de trabalho. Para limpar todos os filtros, você precisa verificar a lista filtrada em diferentes planilhas e depois limpá-los manualmente um por um. Isso é irritante! Neste artigo, mostraremos vários métodos para limpar filtros ao abrir, salvar ou fechar uma pasta de trabalho no Excel.

Limpar filtros ao abrir a pasta de trabalho no Excel
Limpar filtros ao salvar a pasta de trabalho no Excel
Limpar filtros ao fechar/sair da pasta de trabalho no Excel

Limpar filtros ao abrir a pasta de trabalho no Excel

Esta seção trata da limpeza de filtros em todas as planilhas ao abrir uma pasta de trabalho. Por favor, siga os passos abaixo.

1. Em uma pasta de trabalho onde você precisa limpar automaticamente todos os filtros ao abrir, pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique duas vezes em ThisWorkbook no painel Projeto à esquerda, e então copie e cole o código VBA abaixo na janela ThisWorkbook (Código). Veja a captura de tela:

Código VBA: Limpar todos os filtros ao abrir a pasta de trabalho

Private Sub Workbook_Open()
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
    Next ws
End Sub

3. Pressione as teclas Alt + Q para sair da janela Microsoft Visual Basic for Applications.

4. Clique em Arquivo > Salvar Como. Na caixa de diálogo Salvar Como que aparece, especifique uma pasta para salvar esta pasta de trabalho, nomeie-a conforme necessário na caixa Nome do arquivo, selecione a opção Pasta de Trabalho Habilitada para Macro na lista suspensa Especificar Formato de Salvamento e, finalmente, clique no botão Salvar.

A partir de agora, ao abrir esta Pasta de Trabalho Habilitada para Macro, todos os filtros nesta pasta de trabalho serão limpos automaticamente.

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!

Limpar filtros ao salvar a pasta de trabalho no Excel

Você pode limpar todos os filtros da pasta de trabalho atual toda vez que salvá-la.

1. Na pasta de trabalho da qual você precisa limpar automaticamente todos os filtros, pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique duas vezes em ThisWorkbook no painel Projeto à esquerda, e então copie e cole o código VBA abaixo na janela ThisWorkbook (Código). Veja a captura de tela:

Código VBA: Limpar filtros ao salvar a pasta de trabalho

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
    Next ws
End Sub

3. Pressione as teclas Alt + Q para sair da janela Microsoft Visual Basic for Applications.

A partir de agora, ao salvar a pasta de trabalho, todos os filtros serão limpos automaticamente.

Limpar filtros ao fechar/sair da pasta de trabalho no Excel

Na última seção, mostraremos como limpar todos os filtros nas planilhas ao fechar ou sair da pasta de trabalho.

1. Abra a pasta de trabalho da qual você precisa limpar automaticamente todos os filtros, depois pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique duas vezes em ThisWorkbook no painel Projeto à esquerda, e então copie e cole o código VBA abaixo na janela ThisWorkbook (Código). Veja a captura de tela:

Código VBA: Limpar todos os filtros nas planilhas ao fechar/sair da pasta de trabalho

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.AutoFilterMode = False
        End If
    Next ws
End Sub

Observação: Se você quiser apenas limpar os filtros na planilha atual, use o seguinte código VBA.

Código VBA: Limpar filtro na planilha ativa ao fechar a pasta de trabalho

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    Set ws = ActiveSheet
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
End Sub

3. Pressione as teclas Alt + Q para sair da janela Microsoft Visual Basic for Applications.

A partir de agora, todos os filtros serão limpos automaticamente após clicar no botão Fechar na pasta de trabalho.

Artigos relacionados:

• Como limpar o cache de filtro (itens antigos) da Tabela Dinâmica no Excel?
• Como limpar filtros de todas as planilhas na pasta de trabalho ativa no Excel?
• Como filtrar dados com base em caixas de seleção no Excel?
• Como preencher uma série de números em uma coluna de lista filtrada no Excel?