Wie kann man mehrere Zeilen basierend auf Duplikaten in Excel zu einer zusammenfassen?

Vielleicht haben Sie die folgenden Screenshot-Daten. In der Spalte A mit den Produktnamen gibt es einige doppelte Einträge, und nun müssen Sie die doppelten Einträge in Spalte A entfernen, aber die entsprechenden Werte in Spalte B zusammenfassen. Siehe Screenshots:

Haben Sie einige effektive Methoden, um diese Aufgabe zu lösen?

Mehrere doppelte Zeilen mit VBA-Code zu einer zusammenfassen

Mehrere doppelte Zeilen mit Kutools für Excel zu einer zusammenfassen

Mehrere doppelte Zeilen zusammenführen und Werte summieren/mitteln mit Kutools für Excel

Mehrere doppelte Zeilen mit VBA-Code zu einer zusammenfassen

Der folgende VBA-Code kann Ihnen helfen, doppelte Zeilen basierend auf dem Wert in Spalte A zusammenzuführen, und der folgende Code gilt nur für zwei Spalten. Wenn Sie also Daten in zwei Spalten haben, wird dieser Code Ihnen helfen.

1. Halten Sie die Tasten ALT + F11 gedrückt, und das Fenster Microsoft Visual Basic for Applications öffnet sich.

2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code im Modulfenster ein.

VBA-Code: Mehrere Zeilen zu einer zusammenführen

Sub CombineRows()
'Update 20131202
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

3. Drücken Sie dann die F5-Taste, und ein Eingabeaufforderungsfenster erscheint, das Sie daran erinnert, einen Bereich auszuwählen, den Sie zusammenführen möchten. Siehe Screenshot:

4. Klicken Sie anschließend auf OK, und die Werte in Spalte B werden zu einem Datensatz zusammengeführt und durch Leerzeichen getrennt.

Hinweise:

1. Dieser Code kann die Originaldaten zerstören; wenn Sie ihn verwenden, sollten Sie die Daten vorher sichern.

2. Dieser Code gilt nur für zwei Spalten. Wenn Sie mehr als zwei Spalten haben, werden nur die ersten beiden Spalten zusammengeführt, und die Daten der anderen Spalten werden gelöscht. Seien Sie beim Gebrauch dieses Codes vorsichtig.

Mehrere doppelte Zeilen mit Kutools für Excel zu einer zusammenfassen

Da der obige Code einige Einschränkungen und Risiken hat, gibt es eine praktische und sichere Möglichkeit, diese Aufgabe zu erledigen? Mit dem Hilfsprogramm Erweiterte Zeilen zusammenführen von Kutools für Excel können Sie schnell mehrere doppelte Zeilen in den Spalten entfernen, auf denen Sie basieren, und andere Datensätze in geeignete Zellen zusammenführen oder Berechnungen durchführen.

Kutools für Excel enthält über 300 praktische Excel-Tools. Kostenlos 30 Tage lang ohne Einschränkungen testen. Jetzt herunterladen.

Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:

1. Wählen Sie den Datenbereich aus, den Sie zusammenführen möchten.

2. Klicken Sie dann auf Kutools > Zusammenführen & Aufteilen > Erweiterte Zeilen zusammenführen.

3. Wählen Sie im Dialogfeld Erweiterte Zeilen zusammenführen den Spaltennamen als Schlüsselspalte aus, auf deren Basis Sie die Werte zusammenführen möchten, und klicken Sie dann auf Schlüsselspalten.

4. Klicken Sie weiterhin auf die Spalte, deren Werte Sie in einen Datensatz zusammenführen möchten, und klicken Sie dann auf Konsolidierungstyp und wählen Sie Nur zusammenführen mit Trennzeichen aus, und wählen Sie ein Trennzeichen aus der rechten Liste aus, um die zusammengeführten Werte zu trennen. Siehe Screenshot:

5. Nachdem Sie die Einstellungen abgeschlossen haben, klicken Sie auf OK, und Ihre Daten werden basierend auf den Schlüsselspalten zusammengeführt und durch Trennzeichen getrennt.

Hinweis: Wenn Sie keine Operationen für die restlichen Spalten festlegen müssen, belassen Sie sie im Standardzustand.

Mehrere doppelte Zeilen zusammenführen und Werte summieren/mitteln mit Kutools für Excel

Mit diesem multifunktionalen Hilfsprogramm Erweiterte Zeilen zusammenführen können Sie doppelte Zeilen zusammenführen und Berechnungen für die Werte durchführen.

1. Wählen Sie den Datenbereich aus, den Sie zusammenführen möchten.

2. Gehen Sie zum Dialogfeld Erweiterte Zeilen zusammenführen;

• (1.) Wählen Sie einen Spaltennamen als Schlüsselspalte aus, auf deren Basis Sie andere Spaltenwerte berechnen möchten, und klicken Sie dann auf Schlüsselspalten;
• (2.) Wählen Sie die Spalte aus, für die Sie Berechnungen durchführen möchten, und klicken Sie dann auf Konsolidierungstyp > Berechnen, und wählen Sie den gewünschten Berechnungstyp aus. In diesem Fall wähle ich Summe. Siehe Screenshot:

3. Wenn Sie keine Operationen für die restlichen Spalten festlegen müssen, belassen Sie sie im Standardzustand, klicken Sie dann auf OK, und die doppelten Werte in Spalte A werden zusammengeführt und ihre entsprechenden Werte in Spalte B addiert. Siehe Screenshots:

Hinweise:

1. Wenn Sie die Option Meine Daten enthalten Überschriften aktivieren, werden die Kopfzeilen (die erste Zeile) des Bereichs ignoriert, wenn Sie dieses Hilfsprogramm anwenden.

2. Formatierte Werte verwenden: Es behält die Formatierung der Werte bei, nachdem die doppelten Zellen zusammengeführt wurden.

3. Diese Funktion ist nicht für gefilterte Daten verfügbar.

Klicken Sie hier, um mehr über diese Funktion Erweiterte Zeilen zusammenführen zu erfahren.

Verwandter Artikel:

Doppelte Zeilen zusammenführen und Werte summieren