Filtro automático de atualização automática no Excel, atualização

Question

Como posso atualizar automaticamente um filtro automático do Excel quando os dados são alterados?

Caso de uso: altero o valor de uma célula para um valor que foi filtrado. Eu quero ver a linha atual desaparecendo sem ter que fazer mais nada.

Parece que não funciona com casos mais complexos:

suponha que você tenha uma planilha e uma tabela de duas colunas: col A: resultado da avaliação da fórmula, um número; col B = nome; A tarefa é fácil: crie um filtro de nomes e números com base nos critérios de número > 0

O que você faz é usar o autofiltro para isso e funciona. Mas não é auto-refrescante.

As macros propostas de alguma forma não querem funcionar:

• Primeiro, crio o filtro automático e aplico os critérios (trabalhos)
• Em segundo lugar, altero o conteúdo das folhas adjacentes, o que faz com que a folha ativa (col A) mude
• As macros são executadas, mas não filtram novamente a lista: os registros antigos ainda estão lá, mas com novos números (até 0, quando eu uso critérios > 0). -Então as Macros desligam o botão e o modo Auto-filtro, então perco a minha seleção e tenho que re-selecionar manualmente.

Falha total ... algum comentário?

    

Answer 1

Tente isso

Coloque isso no seu módulo ThisWorkbook

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    If TypeName(Sh) = "Worksheet" Then
        With Sh
            If .AutoFilterMode Then
                If Not Intersect(.AutoFilter.Range, Target) Is Nothing Then
                    .AutoFilter.ApplyFilter
                End If
            End If
        End With
    End If
End Sub

Então, sempre que você digitar algo em uma célula que faça parte de um intervalo de filtro, o filtro será atualizado