Wie füge ich Texte in einer Spalte ohne Duplikate in Excel hinzu?
Wissen Sie, wie Sie Texte aus einer Spalte in eine Zelle ohne Duplikate in Excel einfügen können? Und was ist, wenn Sie Texte in einer Spalte ohne Duplikate basierend auf einem bestimmten Zellenwert verbinden? Dieser Artikel enthält Methoden zur Lösung der Probleme.
Verbinden Sie Texte in einer Spalte ohne Duplikate mit der Formel
Verbinden Sie Texte in einer Spalte ohne Duplikate basierend auf einem anderen Zellenwert mit VBA-Code
Fügen Sie mit einem erstaunlichen Werkzeug ganz einfach Texte in einer Spalte zusammen, die auf einem anderen Zellenwert basiert
Mehr Tutorial zum Kombinieren von Zellen…
Verbinden Sie Texte in einer Spalte ohne Duplikate mit der Formel
Wie der folgende Screenshot zeigt, möchten Sie Texte in Spalte A zu einer einzigen Zelle ohne Duplikate zusammenfügen. Bitte gehen Sie wie folgt vor.
1. Wählen Sie eine leere Zelle aus, kopieren Sie die folgende Formel hinein und drücken Sie die Taste Andere + Shift + Enter Schlüssel gleichzeitig.
=TEXTJOIN(", ", TRUE, IF(MATCH(A2:A12, A2:A12, 0)=MATCH(ROW(A2:A12), ROW(A2:A12)), A2:A12, ""))
Hinweis: In der Formel „, Ist das Trennzeichen der kombinierten Texte; A2: A12 sind die Spaltenzellen, die Sie zusammenfügen. Bitte ändern Sie sie nach Bedarf.
Jetzt werden die Texte in der angegebenen Spalte ohne Duplikate zusammengefügt.
Verbinden Sie Texte in einer Spalte ohne Duplikate basierend auf einem anderen Zellenwert mit VBA-Code
Manchmal benötigen Sie möglicherweise Verknüpfungstexte in einer Spalte ohne Duplikate basierend auf dem Wert in einer anderen Zelle. Wie im folgenden Screenshot gezeigt, können Sie diese wie folgt anzeigen.
1. Drücken Sie im Arbeitsblatt mit den Texten, denen Sie beitreten möchten, die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. In dem Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul, und kopieren Sie dann den folgenden VBA-Code in das Modulcode-Fenster.
VBA-Code: Verbinden Sie Texte in einer Spalte ohne Duplikate basierend auf einem anderen Zellenwert
Sub JoinTextsWithoutDuplicates()
'Updated by Extendoffice 20190924
Dim xRg As Range
Dim xArr As Variant
Dim xCell As Range
Dim xTxt As String
Dim I As Long
Dim xDic As Object
Dim xValue
Dim xStr, xStrValue As String
Dim xB As Boolean
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "Does not support multiple selections", , "Kutools for Excel"
Exit Sub
End If
If xRg.Columns.Count <> 2 Then
MsgBox "There must be only two columns in the selected range", , "Kutools for Excel"
Exit Sub
End If
xArr = xRg
Set xDic = CreateObject("Scripting.Dictionary")
xDic.CompareMode = 1
For I = 1 To UBound(xArr)
If Not xDic.Exists(xArr(I, 1)) Then
xDic.Item(xArr(I, 1)) = xDic.Count + 1
xArr(xDic.Count, 1) = xArr(I, 1)
xArr(xDic.Count, 2) = xArr(I, 2)
Else
xStrValue = xArr(I, 2)
xB = True
For Each xStr In Split(xArr(xDic.Item(xArr(I, 1)), 2), ",")
If xStr = xStrValue Then
xB = False
Exit For
End If
Next
If xB Then
xArr(xDic.Item(xArr(I, 1)), 2) = xArr(xDic.Item(xArr(I, 1)), 2) & "," & xArr(I, 2)
End If
End If
Next
Sheets.Add.Cells(1).Resize(xDic.Count, 2).Value = xArr
End Sub
3. Drücken Sie die Taste F5 Schlüssel zum Ausführen des Codes. Beim Auftauchen Kutools for Excel Wählen Sie im Dialogfeld den Bereich aus, der sowohl die Werte enthält, auf denen Sie Texte verknüpfen, als auch die Texte, denen Sie beitreten möchten, und klicken Sie dann auf OK .
Anschließend werden die eindeutigen Werte extrahiert und die entsprechenden eindeutigen Texte in einer anderen Spalte zusammengefügt und in ein neues Arbeitsblatt eingefügt.
Fügen Sie mit einem erstaunlichen Werkzeug ganz einfach Texte in einer Spalte zusammen, die auf einem anderen Zellenwert basiert
Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.
Hinweis: Da das Dienstprogramm direkt im ursprünglichen Bereich angewendet wird, erstellen Sie bitte eine Kopie der Originaldaten, bevor Sie den folgenden Vorgang ausführen.
1. Wählen Sie den Bereich aus (einschließlich der Texte, denen Sie beitreten möchten, und des Werts, auf dem Sie Texte verknüpfen möchten), und klicken Sie auf Kutoolen > Inhalt > Erweiterte Zeilen kombinieren. Screenshot:
2. In dem Erweiterte Zeilen kombinieren Dialog, bitte gehen Sie wie folgt vor:
- Wählen Sie die Spalte mit den Werten aus, auf denen Sie Texte verknüpfen möchten, und klicken Sie auf Primärschlüssel;
- Wählen Sie die Spalte mit den Texten aus, die Sie zu einer Zelle hinzufügen möchten, und klicken Sie auf Kombinieren > Komma;
- Wenn noch Spalten vorhanden sind, geben Sie bitte die Bedingungen dafür an. In diesem Fall wähle ich die Spalte Verkauf und wähle Berechnen > Summe.
- Klicken Sie auf die OK Taste. Siehe Screenshot:
Dann können Sie sehen, dass alle Texte in der angegebenen Spalte basierend auf der Schlüsselspalte verbunden werden. Siehe Screenshot:
Wenn Sie eine kostenlose Testversion (30 Tage) dieses Dienstprogramms wünschen, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.
In Verbindung stehende Artikel
Kombinieren Sie doppelte Zeilen und summieren Sie die Werte in Excel
In Excel kann dieses Problem immer auftreten, wenn Sie einen Datenbereich haben, der einige doppelte Einträge enthält, und jetzt die doppelten Daten kombinieren und die entsprechenden Werte in einer anderen Spalte summieren möchten. Wie können Sie dieses Problem lösen? Probieren Sie die Methoden in diesem Artikel aus.
Kombinieren Sie mehrere Zellen in einer Zelle mit Leerzeichen, Kommas oder anderen Trennzeichen in Excel
Wenn Sie die Zellen aus mehreren Spalten oder Zeilen zu einer einzigen Zelle kombinieren, werden die kombinierten Daten möglicherweise durch nichts getrennt. Aber wie können Sie vorgehen, wenn Sie sie durch bestimmte Zeichen wie Leerzeichen, Kommas, Semikolon oder andere trennen möchten? In diesem Tutorial werden einige Methoden für Sie vorgestellt.
Verketten Sie Zellen, wobei die Formatierung von Zahlen und Datumsangaben in Excel beibehalten wird
Möglicherweise haben Sie bemerkt, dass bei Anwendung der CONCATENATE-Funktion in Excel das Datumsformat (2014) und das Zahlenformat wie das Währungsformat (01 USD), das Prozentformat (03%), die Dezimalstellen (734.7 USD) usw. werden entfernt und als allgemeine Zahlen in den Verkettungsergebnissen angezeigt. In diesem Artikel finden Sie verschiedene Problemumgehungen, um Daten mit der Beibehaltung der Datums- oder Zahlenformatierung in Excel zu verknüpfen.
Kehren Sie die Verkettungsfunktion in Excel um
Wie wir alle wissen, kann die Verkettungsfunktion in Excel uns helfen, mehrere Zellen zu einer Zelle zu kombinieren. Manchmal möchten Sie jedoch das Gegenteil der Verkettungsfunktion tun. Dies bedeutet, dass Sie keine Zellen kombinieren, sondern den Zellwert in mehrere getrennte Zellen aufteilen. Die Methoden in diesem Artikel helfen bei der Lösung des Problems.
Verketten Sie Zellen, wenn derselbe Wert in einer anderen Spalte in Excel vorhanden ist
Dieser Artikel enthält Methoden, mit denen Sie Zellen einfach verketten können, wenn derselbe Wert in einer anderen Spalte in Excel vorhanden ist.
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!