Wie entfernt man Filter aus allen Arbeitsblättern der aktuellen Arbeitsmappe in Excel?
Beim Arbeiten mit einer Excel-Arbeitsmappe, die mehrere Arbeitsblätter enthält, ist es gängig, Filter auf verschiedenen Blättern zu nutzen, um Daten effizient zu analysieren. Sobald Filter auf mehreren Blättern aktiviert sind, möchten Sie diese unter Umständen später alle auf einmal entfernen, um Ihre Arbeitsblätter in ihren ursprünglichen, ungefilterten Zustand zurückzuversetzen. Dies manuell zu erledigen – indem Sie jedes Arbeitsblatt einzeln aufrufen und die Filter nacheinander löschen – kostet nicht nur wertvolle Zeit, sondern birgt auch das Risiko, ein Blatt zu übersehen.
Diese Aufgabe kommt häufig in Szenarien vor, in denen Sie eine Arbeitsmappe von Kollegen erhalten oder Daten aus mehreren Teams konsolidieren und sicherstellen möchten, dass alle Filter entfernt sind, bevor Sie mit Ihrer eigenen Analyse beginnen oder Berichte zur Weitergabe vorbereiten. Die manuelle Bearbeitung jedes Arbeitsblatts kann besonders bei großen Arbeitsmappen mit Dutzenden von Blättern zeitaufwändig und ineffizient sein. Eine schnelle und zuverlässige Methode zum Löschen aller Filter aus jedem Arbeitsblatt Ihrer aktuellen Arbeitsmappe spart daher erheblich Zeit und Aufwand – und reduziert gleichzeitig das Risiko, versehentlich gefilterte Daten zu übersehen.
Im Folgenden stellen wir eine praktische Methode vor, mit der Sie dies in nur wenigen Schritten erreichen können. Für fortgeschrittene oder alternative Techniken – etwa formelbasierte Ansätze oder die Nutzung von Excel-Add-Ins – verweisen wir auf die zusätzlichen Lösungen am Ende dieses Artikels.
Filter aus allen Arbeitsblättern in Aktuelle Arbeitsmappe mithilfe von VBA-Code löschen
Filter aus allen Arbeitsblättern in Aktuelle Arbeitsmappe mithilfe von VBA-Code löschen
Um effizient alle Filter aus jedem Blatt Ihrer aktuellen Arbeitsmappe zu entfernen, können Sie ein VBA-Skript nutzen. Dieser Ansatz eignet sich ideal für Anwender, die mit dem Ausführen von Makros in Excel vertraut sind, und ist besonders wirkungsvoll in Arbeitsmappen, die unterschiedliche Arten strukturierter Daten kombinieren.
Speichern Sie Ihre Arbeit vorab, da der VBA-Code umfassende Änderungen an Ihrer Arbeitsmappe vornimmt.
1. Drücken Sie in der Arbeitsmappe, in der Sie Filter löschen möchten, gleichzeitig Alt+F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen. Falls Sie Excel zum ersten Mal verwenden, müssen Sie möglicherweise die Registerkarte „Entwicklertools“ über das Menü „Optionen“ aktivieren.
2. Navigieren Sie im geöffneten Fenster Microsoft Visual Basic for Applications zu Einfügen > Modul, um ein neues Modul zu erstellen. Kopieren Sie anschließend das folgende VBA-Skript in das Modulfenster. Eine Referenz finden Sie in der Abbildung unten:
VBA-Code: Filter aus allen Arbeitsblättern in Aktuelle Arbeitsmappe löschen
Sub Clear_fiter()
'Updated by Extendoffice 20250902
Dim xAF As AutoFilter
Dim xFs As Filters
Dim xLos As ListObjects
Dim xLo As ListObject
Dim xRg As Range
Dim xWs As Worksheet
Dim xIntC, xF1, xF2, xCount As Integer
Application.ScreenUpdating = False
On Error Resume Next
For Each xWs In Application.Worksheets
xWs.ShowAllData
Set xLos = xWs.ListObjects
xCount = xLos.Count
For xF1 = 1 To xCount
Set xLo = xLos.Item(xF1)
Set xRg = xLo.Range
xIntC = xRg.Columns.Count
For xF2 = 1 To xIntC
xLo.Range.AutoFilter Field:=xF2
Next
Next
Next
Application.ScreenUpdating = True
End Sub
3. Drücken Sie die Taste F5 oder klicken Sie auf die Schaltfläche Ausführen, um den Code auszuführen. Nach der Ausführung werden sämtliche Filter – sowohl Standardbereichsfilter als auch tabellenbasierte Filter – auf allen Arbeitsblättern Ihrer aktuellen Arbeitsmappe sofort gelöscht.
Stellen Sie sicher, dass Sie Ihre Arbeitsmappe gespeichert haben, bevor Sie Makros ausführen – denn Aktionen per VBA lassen sich nicht mit Strg + Z rückgängig machen.
Verwandte Artikel:
- Wie löscht man den Filtercache (also alte Einträge) in einer PivotTable in Excel?
- Wie entfernt man Filter beim Öffnen, Speichern oder Schließen einer Arbeitsmappe in Excel?
- Wie filtert man Daten in Excel basierend auf einem Kontrollkästchen?
- Wie füllt man eine Zahlenreihe in einer gefilterten Spalte in Excel aus?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins