Verketten von Autofilter-Ergebnissen in Excel
Schritt-für-Schritt-Anleitung
Um alle Zellen einer Spalte eines Autofilter-Ergebnisses zu verketten, kannst du die folgende Vorgehensweise nutzen:
-
VBA aktivieren: Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Modul hinzufügen: Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.
-
Code einfügen: Kopiere den folgenden VBA-Code in das Modul:
Function TextTeilergebnis(Bereich As Range, Optional TrennKZ As String) As String
Dim Zelle As Range
Dim Erg As String
For Each Zelle In Bereich.Cells
If Not Zelle.EntireRow.Hidden Then Erg = Erg & Zelle.Value & TrennKZ
Next
TextTeilergebnis = Left(Erg, Len(Erg) - Len(TrennKZ))
End Function
-
Funktion speichern: Schließe den VBA-Editor und speichere die Datei als Excel-Arbeitsmappe mit Makros (Dateiendung .xlsm).
-
Funktion verwenden: Gehe zurück zu deiner Excel-Tabelle und verwende die Funktion in einer Zelle:
=TextTeilergebnis(A2:A10, ", ")
Ersetze A2:A10 durch den Bereich, den du verketten möchtest, und ", " durch dein gewünschtes Trennzeichen.
Häufige Fehler und Lösungen
-
Fehler: "Funktion nicht definiert"
Lösung: Stelle sicher, dass du die Datei als Makro-fähige Arbeitsmappe (.xlsm) gespeichert hast.
-
Fehler: Kein Ergebnis angezeigt
Lösung: Überprüfe, ob der Autofilter aktiv ist und ob die Zellen, die du verketten möchtest, tatsächlich sichtbar sind.
Alternative Methoden
Wenn du keine VBA-Lösungen verwenden möchtest, kannst du auch die Funktion TEXTVERKETTEN (ab Excel 2016 verfügbar) nutzen:
=TEXTVERKETTEN(", "; WAHR; A2:A10)
Diese Funktion ermöglicht es dir, Zellen zu verketten und dabei leere Zellen zu ignorieren.
Praktische Beispiele
Angenommen, du hast eine Liste von Namen in den Zellen A2 bis A10 gefiltert. Um diese Namen zu verketten, gehe wie folgt vor:
-
Nutze die VBA-Funktion:
=TextTeilergebnis(A2:A10, ", ")
-
Oder die TEXTVERKETTEN-Funktion:
=TEXTVERKETTEN(", "; WAHR; A2:A10)
Beide Methoden liefern dir das Ergebnis in einer einzigen Zelle, was besonders nützlich ist, wenn du umfangreiche Daten analysieren möchtest.
Tipps für Profis
-
Teste die VBA-Funktion mit verschiedenen Trennzeichen, um das gewünschte Layout zu erreichen.
-
Verwende die WENNFEHLER-Funktion, um Fehler bei leeren Bereichen zu vermeiden:
=WENNFEHLER(TextTeilergebnis(A2:A10, ", "), "Keine Daten")
-
Halte deine VBA-Module organisiert, besonders wenn du mehrere benutzerdefinierte Funktionen erstellst.
FAQ: Häufige Fragen
1. Kann ich die Funktion auch in Excel Online verwenden?
Leider unterstützt Excel Online keine benutzerdefinierten VBA-Funktionen. Du kannst jedoch die TEXTVERKETTEN-Funktion verwenden.
2. Was passiert, wenn ich einen nicht sichtbaren Bereich auswähle?
Die Funktion ignoriert automatisch nicht sichtbare Zellen, sodass sie nur die sichtbaren Zellen verketten wird.