Tutorial Togliere il filtro

ges

Excel/VBA Expert
Amministratore
21 Giugno 2015
28.864
1.865
Como
2011MAC 365WIN
915
Ci sono due modalità per togliere il filtro in un foglio con celle filtrate.

Mettiamo di avere il seguente intervallo



e filtriamo la colonna C con "Milano"



1° MOLALITA' - TOGLIE IL FILTRO
Visual Basic:
Sub Togli_Filtro()
    With ActiveSheet
        If .AutoFilterMode Then
            If .FilterMode Then
                .ShowAllData
            End If
        End If
    End With
End Sub
il filtro rimane ma nulla è più filtrato e l'intervallo torna come nella prima immagine.
N.B. Il controllo di .AutoFilterMode è dovuto per evitare che siano eliminati anche eventuali i filtri avanzati presenti nel foglio; ovviamente nel caso non interessa si può anche omettere questa prima verifica, lasciando solo la seconda (.FilterMode)

------------------

2° MOLALITA' - ELIMINA IL FILTRO
Visual Basic:
Sub Elimina_Filtro()
    With ActiveSheet
        If .AutoFilterMode = True Then
            .AutoFilter.Range.AutoFilter
        End If
    End With
End Sub
il filtro scompare totalmente e l'intervallo diventa così

 

Sostieni ForumExcel

Aiutaci a sostenere le spese e a mantenere online la community attraverso una libera donazione!