AutoFilter Kriterium auslesen in Excel
Schritt-für-Schritt-Anleitung
Um das AutoFilter Kriterium in Excel auszulesen, kannst du das folgende VBA-Makro verwenden. Dieses Skript zeigt dir, wie du das Kriterium aus dem aktiven Blatt abrufen und in einer MsgBox darstellen kannst.
-
Öffne Excel und gehe zu dem Arbeitsblatt, auf dem du den AutoFilter aktiviert hast.
-
Drücke ALT + F11
, um den VBA-Editor zu öffnen.
-
Klicke im Menü auf Einfügen
und wähle Modul
, um ein neues Modul zu erstellen.
-
Füge den folgenden Code in das Modul ein:
Sub testen()
Dim varKriterium1 As Variant
With ActiveSheet
If .AutoFilterMode Then
With .AutoFilter.Filters(1)
If .On Then varKriterium1 = .Criteria1
End With
End If
End With
If varKriterium1 <> "" Then MsgBox varKriterium1
End Sub
-
Schließe den VBA-Editor und gehe zurück zu Excel.
-
Führe das Makro aus, um das Kriterium des Filters anzuzeigen.
Häufige Fehler und Lösungen
Alternative Methoden
Neben der Verwendung von VBA gibt es auch die Möglichkeit, das Kriterium direkt in einer Zelle anzuzeigen. Du kannst dies über eine Formel realisieren, indem du die Filterkriterien manuell in die Zelle eingibst oder die Filterung auf eine andere Art und Weise auswertest.
Für diese Methode benötigst du jedoch keine Programmierkenntnisse und kannst sie direkt in den Zellen anwenden.
Praktische Beispiele
Hier ist ein praktisches Beispiel, wie du das Kriterium in einer bestimmten Zelle anzeigen kannst. Angenommen, du möchtest das Kriterium in Zelle A1 anzeigen:
- Setze das VBA-Makro wie oben beschrieben ein.
-
Ändere die MsgBox-Zeile im Code zu:
Range("A1").Value = varKriterium1
Jetzt wird das Kriterium des AutoFilters in Zelle A1 angezeigt, anstatt in einer MsgBox.
Tipps für Profis
- Nutze Variablen, um mehrere Filterkriterien auszulesen, indem du die Filternummer änderst, z.B.
.Filters(2)
für den zweiten Filter.
- Kombiniere die VBA-Methode mit Schaltflächen in deinem Excel-Blatt, um die Benutzerfreundlichkeit zu erhöhen.
- Experimentiere mit weiteren VBA-Funktionen, um komplexere Filter auszuwerten und zu visualisieren.
FAQ: Häufige Fragen
1. Wie kann ich mehrere Filterkriterien gleichzeitig auslesen?
Du kannst die Filternummer im Code ändern und zusätzliche Variablen für jedes Kriterium erstellen.
2. Funktioniert das auch in Excel Online?
VBA-Makros sind in Excel Online nicht verfügbar. Du musst die Desktop-Version von Excel verwenden, um VBA auszuführen.