Wie verkette ich nur sichtbare Zellen in Excel?
Wenn Sie jetzt eine Liste gefilterter Daten haben, müssen Sie nur noch die sichtbaren Zellen verketten und die versteckten Zellen ignorieren, um das folgende kombinierte Ergebnis zu erhalten. Wie können Sie diese Aufgabe schnell und einfach in Excel erledigen?
Verketten Sie nur sichtbare Zellenwerte mit VBA-Code zu einer Zelle
Verketten Sie nur sichtbare Zellenwerte mit VBA-Code zu einer Zelle
Sie können eine Benutzerdefinierte Funktion Führen Sie die folgenden Schritte aus, um diesen Job zu lösen:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Verketten Sie nur sichtbare Zellenwerte:
Private Function ConcatenateVisible(xRg As Variant, sptChar As String)
'Updateby Extendoffice
Dim rg As Range
For Each rg In xRg
If (rg.EntireRow.Hidden = False) And (rg.EntireColumn.Hidden = False) Then
ConcatenateVisible = ConcatenateVisible & rg.Value & sptChar
End If
Next
ConcatenateVisible = Left(ConcatenateVisible, Len(ConcatenateVisible) - Len(sptChar))
End Function
3. Speichern und schließen Sie diesen Code, kehren Sie zum Arbeitsblatt zurück und geben Sie die folgende Formel ein: = verkettet sichtbar (B2: B10, "-") (B2: B10 ist der gefilterte Datenbereich, den Sie kombinieren möchten. “-”Ist das Trennzeichen zum Trennen der kombinierten Werte. Sie können sie nach Bedarf ändern.) In eine leere Zelle, in der Sie das kombinierte Ergebnis suchen möchten, und dann drücken Enter Schlüssel, um das Ergebnis zu erhalten. Siehe Screenshot:
Note: Mit dieser benutzerdefinierten Funktion wird das kombinierte Ergebnis dynamisch mit Ihren gefilterten Daten geändert. Wenn Sie beispielsweise das Produkt von KTO filtern, wird Ihr kombiniertes Ergebnis in die neuen gefilterten Daten geändert. Siehe Screenshot:
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, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!