Jak wyczyścić filtry w excelu za pomocą vba (z przykładem)

Możesz użyć następującej składni w VBA, aby wyczyścić wszystkie filtry z arkusza Excel:

 SubClearFilters ()

If ActiveSheet.AutoFilterMode Then ActiveSheet.ShowAllData

End Sub

To konkretne makro usunie wszystkie filtry z aktualnie aktywnego arkusza.

To makro działa przy użyciu metody ShowAllData , aby wymusić widoczność wszystkich aktualnie ukrytych wierszy.

Jeśli w aktywnym arkuszu nie są obecnie filtrowane żadne wiersze, po uruchomieniu tego makra nic się nie stanie.

Poniższy przykład pokazuje, jak w praktyce wykorzystać to makro.

Przykład: Wyczyść wszystkie filtry w Excelu za pomocą VBA

Załóżmy, że mamy w programie Excel następujący zbiór danych zawierający informacje o różnych koszykarzach:

Załóżmy teraz, że dodamy filtr, aby wyświetlać tylko wiersze, w których wartość w kolumnie Zespół jest równa Mavs lub Nets:

Załóżmy teraz, że chcemy wyczyścić ten filtr za pomocą VBA.

W tym celu możemy utworzyć następujące makro:

 SubClearFilters ()

If ActiveSheet.AutoFilterMode Then ActiveSheet.ShowAllData

End Sub

Kiedy uruchomimy to makro, filtr zostanie automatycznie usunięty z arkusza:

Pamiętaj, że wszystkie wcześniej ukryte wiersze są teraz ponownie widoczne, ponieważ wyczyściliśmy filtr.

Uwaga : Pełną dokumentację metody VBA ShowAllData można znaleźć tutaj .

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w VBA:

VBA: Jak filtrować tabele przestawne
VBA: jak odświeżyć tabele przestawne
VBA: jak usunąć zduplikowane wartości