Erste gefilterte Zeile aus Autofilter in Excel ermitteln
Schritt-für-Schritt-Anleitung
Um die erste gefilterte Zeile aus einem Autofilter in Excel zu ermitteln und in einer bestimmten Zelle (z.B. E1) auszugeben, kannst du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Wähle im Menü Einfügen die Option Modul, um ein neues Modul zu erstellen.
-
Kopiere den folgenden Code in das Modul:
Option Explicit
Public Sub test()
Range("E1") = Range("A2:A65536").Cells.SpecialCells(xlCellTypeVisible)(1)
End Sub
-
Schließe den VBA-Editor und kehre zu deinem Excel-Dokument zurück.
-
Führe das Makro aus, indem du ALT + F8 drückst, das Makro test auswählst und auf Ausführen klickst.
Nun wird die erste sichtbare Zeile nach dem Anwenden des Autofilters in Zelle E1 angezeigt.
Häufige Fehler und Lösungen
Alternative Methoden
Falls du kein VBA verwenden möchtest, kannst du auch die Funktion AGGREGAT in Kombination mit FILTER (in Excel 365) verwenden:
=AGGREGAT(15; 6; A2:A65536/(A2:A65536<>""); 1)
Diese Formel gibt dir den ersten sichtbaren Wert basierend auf einem Filter zurück, ohne VBA verwenden zu müssen.
Praktische Beispiele
Angenommen, du hast die folgende Liste in Spalte A:
A
---
VDe 22-04-B1-MAGV3a
VDe 24-04-B1-MAGV3a
VDe 26-04-B1-MAGV3a
VDe 20-04-B1-MAGV3a
VDe 21-04-B1-MAGV3a
VDe 28-04-B1-MAGV3a
Wenn du den Autofilter auf "enthält '3a'" anwendest, wird nur "VDe 22-04-B1-MAGV3a" sichtbar. Mit dem oben genannten Makro wird dieser Wert in Zelle E1 ausgegeben.
Tipps für Profis
- Nutze die
On Error Resume Next-Anweisung im VBA-Code, um Fehler zu ignorieren und das Makro robuster zu machen.
- Du kannst das Makro anpassen, um Werte aus anderen Zellen oder Bereichen auszugeben, indem du den Zellbereich in
Range("E1") änderst.
- Speichere deine Datei als Makro-fähige Arbeitsmappe (.xlsm), um das Makro später wiederverwenden zu können.
FAQ: Häufige Fragen
1. Kann ich das Makro auch auf andere Zellen anwenden?
Ja, du kannst die Zielzelle in Range("E1") ändern, um den Wert in einer anderen Zelle auszugeben.
2. Funktioniert das Makro in allen Excel-Versionen?
Das VBA-Makro funktioniert in den meisten modernen Excel-Versionen, die VBA unterstützen, wie Excel 2010 und neuer.