Wie entferne ich Duplikate, behalte aber die restlichen Zeilenwerte in Excel?

Bei der täglichen Datenverarbeitung löscht die Funktion „Duplikate entfernen“ von Excel häufig ganze Zeilen, was andere Spaltendaten und die gesamte Arbeitsblattstruktur beeinträchtigen kann. Dieser Artikel stellt mehrere Methoden vor, um nur in einer bestimmten Spalte doppelte Werte zu löschen – während die restlichen Daten jeder Zeile erhalten bleiben – einschließlich Formeln mit Filtern, VBA-Code und dem Kutools-Add-in. Jede Lösung wird durch typische Anwendungsfälle, Vorteile und Überlegungen ergänzt, um Ihnen schnell die Auswahl der am besten passenden Methode zu erleichtern.

Duplikate entfernen, aber restliche Zeilenwerte mit Filter beibehalten (3 Schritte)

Duplikate entfernen, aber restliche Zeilenwerte mit VBA beibehalten (4 Schritte)

Duplikate entfernen, aber restliche Zeilenwerte mit Kutools für Excel beibehalten (2 Schritte)

Duplikate entfernen, aber restliche Zeilenwerte mit Filter beibehalten

Ein zuverlässiger Ansatz, um die Struktur Ihrer Daten beim Löschen von Duplikaten beizubehalten, ist die Kombination einer einfachen Formel mit der Excel-Filterfunktion. Diese Methode ist besonders effektiv, wenn Sie visuell Duplikate aus einer einzelnen Spalte identifizieren und selektiv entfernen möchten, wobei sichergestellt wird, dass andere Informationen in jeder Zeile unberührt bleiben. Diese Technik eignet sich für kleine bis mittlere Datensätze und bietet volle Benutzerkontrolle über den Löschvorgang.

1. Wählen Sie eine leere Zelle neben Ihrem Datenbereich aus (z. B. D2, wenn Ihre Daten in A2 beginnen) und geben Sie die Formel ein: =A3=A2Diese Formel vergleicht jede Zelle mit der darüberliegenden, um Duplikate zu markieren. Ziehen Sie den Ausfüllknauf nach unten, um die Formel auf die restlichen Zeilen anzuwenden. Siehe Screenshot:

2. Wählen Sie als Nächstes den gesamten Datenbereich einschließlich der neu hinzugefügten Formelspalte aus und klicken Sie auf Daten > Filter um die Filterfunktion zu aktivieren. Dadurch können Sie diejenigen Zeilen herausfiltern, die als Duplikate markiert wurden.

3. Klicken Sie auf das Filtersymbol in der Formelspalte (z. B. Spalte D) und wählen Sie aus der Dropdown-Liste nur WAHRaus. Alle doppelten Einträge (außer dem letzten Vorkommen) werden angezeigt.

4. Nachdem Sie auf OKgeklickt haben, werden alle identifizierten doppelten Werte angezeigt. Wählen Sie diese doppelten Zellen aus und drücken Sie die Entfernen Taste, um sie zu löschen, ohne andere Zellen in ihren Zeilen zu beeinträchtigen. So bleibt die Zeilenstruktur erhalten, während nur die doppelten Werte aus der angegebenen Spalte entfernt werden. Siehe Screenshot unten:

Tipp: Seien Sie vorsichtig, nur die doppelten Zellen – nicht die gesamte Zeile – auszuwählen, damit nur die gezielten Werte entfernt werden.

5. Um die Ansicht wiederherzustellen, klicken Sie erneut auf Daten > Filter um den Filter zu deaktivieren. Entfernen oder löschen Sie die Hilfsformelspalte, falls sie nicht mehr benötigt wird. Nun sind die Duplikate aus der angegebenen Spalte verschwunden und alle anderen Zeilenwerte bleiben unverändert.

Duplikate entfernen, aber restliche Zeilenwerte mit VBA beibehalten

VBA bietet eine automatisierte Methode zum Entfernen von Duplikaten aus einer Spalte, während alle anderen Daten in denselben Zeilen unangetastet bleiben. Dieser Ansatz ist ideal für wiederholte Bereinigungsaufgaben, insbesondere bei der Arbeit mit großen Datenmengen oder wenn das Entfernungsverfahren oft wiederholt werden muss. Die Verwendung von VBA minimiert manuelle Fehler und spart Zeit, ist aber am besten für Benutzer geeignet, die mit grundlegendem Skripting in Excel vertraut sind.

1. Drücken Sie Alt + F11, um das Microsoft Visual Basic for Applications Editor-Fenster zu öffnen.

2. Gehen Sie im VBA-Fenster zu Einfügen > Modul und kopieren Sie den folgenden Code in das neue Modul. Dieser Code entfernt doppelte Werte aus dem ausgewählten Bereich, behält aber alle anderen Informationen in den Zeilen bei:

VBA: Duplikate entfernen, aber restliche Zeilenwerte beibehalten

Sub RemoveDuplicates()
'UpdatebyExtendoffice20160918

    Dim xRow As Long
    Dim xCol As Long
    Dim xrg As Range
    Dim xl As Long
    On Error Resume Next
    Set xrg = Application.InputBox("Select a range:", "Kutools for Excel", _
                                    ActiveWindow.RangeSelection.AddressLocal, , , , , 8)

    xRow = xrg.Rows.Count + xrg.Row - 1
    xCol = xrg.Column
    'MsgBox xRow & ":" & xCol
    Application.ScreenUpdating = False
    For xl = xRow To 2 Step -1
        If Cells(xl, xCol) = Cells(xl - 1, xCol) Then
            Cells(xl, xCol) = ""
        End If
    Next xl
    Application.ScreenUpdating = True
    
End Sub

3. Drücken Sie zur Ausführung des Skripts F5 oder klicken Sie auf die Ausführen Schaltfläche. Ein Dialogfenster fordert Sie auf, den Bereich auszuwählen, aus dem Sie doppelte Werte entfernen möchten. Dann klicken Sie auf OK zur Bestätigung.

4. Das Makro wird ausgeführt und entfernt doppelte Werte innerhalb des angegebenen Bereichs, wobei leere Zellen an deren Stelle bleiben, während alle anderen Zeileninhalte erhalten bleiben. Dadurch wird die Struktur Ihres Arbeitsblatts effektiv erhalten.

Duplikate entfernen, aber restliche Zeilenwerte mit Kutools für Excel beibehalten

Wenn Sie Kutools für Excel installiert haben, können Sie den Prozess vereinfachen, Duplikate aus einem Bereich oder einer Spalte zu entfernen, während Sie die restlichen Zeilendaten erhalten. Kutools bietet praktische Funktionen, die doppelte Daten intuitiv und effizient handhaben, was besonders nützlich für Benutzer ist, die häufig Datenlisten in Excel bereinigen müssen.

Nach der Installation von Kutools für Excel können Sie je nach Ihren Daten und Präferenzen eine der beiden folgenden Methoden verwenden:

Methode 1: Gleiche Zellen zusammenführen (2 Schritte)

1. Markieren Sie die doppelten Werte, die Sie deduplizieren möchten. Navigieren Sie dann zu Kutools > Zusammenführen & Aufteilen > Gleiche Zellen zusammenführen. Dadurch werden benachbarte doppelte Werte in eine einzige Zelle zusammengeführt, sodass es einfach ist, alle außer der ersten Instanz zu löschen.

2. Nach dem Zusammenführen wählen Sie die zusammengeführten Zellen aus, gehen Sie zu Startseite > Zusammenführen & Zentrieren > Zellen aufteilen um sie wieder in Standardzellen zurückzuversetzen. Die Duplikate erscheinen nun als leere Zellen und nur der eindeutige Wert bleibt für jede Gruppe übrig.

Das Ergebnis wird ähnlich wie im folgenden Beispiel aussehen, wobei Duplikate entfernt wurden und die restlichen Zeilenwerte erhalten blieben:

Methode 2: Doppelte & Eindeutige Zellen auswählen (4 Schritte)

1. Wählen Sie die gesamte Liste oder den Bereich aus, aus dem Sie doppelte Werte entfernen möchten. Klicken Sie auf Kutools > Auswahl > Doppelte & Eindeutige Zellen auswählen.

2. Im Doppelte & Eindeutige Zellen auswählen Dialogfeld wählen Sie Duplikate (Außer erstes) im Regel Abschnitt. Dadurch werden alle Instanzen von Duplikaten nach dem ersten Vorkommen hervorgehoben.

3. Klicken Sie auf OKEine Meldung informiert Sie, wie viele doppelte Zellen ausgewählt wurden. Bestätigen Sie mit einem weiteren OK.

4. Drücken Sie einfach die Entf-Taste, um diese ausgewählten doppelten Werte zu entfernen, wobei der Rest Ihrer Zeilendaten unberührt bleibt.

Zusammenfassung und Problembehandlung: Jede oben genannte Lösung bietet einen praktischen Ansatz zum Entfernen von Duplikaten, während der Rest Ihrer Zeilendaten in Excel intakt bleibt. Die Filter- und Formelmethoden eignen sich für transparente, schrittweise manuelle Verarbeitung; VBA ist wertvoll für Stapel- oder wiederkehrende Bereinigungen; und Kutools bietet komfortable, optimierte Operationen für regelmäßige Nutzer. Überprüfen Sie immer Ihre ausgewählten Bereiche, erstellen Sie Sicherungskopien vor Stapeloperationen und wählen Sie die Lösung, die zu Ihrem Workflow und Ihrer Komfortzone mit Formeln oder Code passt. Wenn Sie Probleme wie übersehene Duplikate oder versehentlichen Datenverlust feststellen, überprüfen Sie Ihre Hilfsspalten auf Genauigkeit, prüfen Sie die Sortierung und bestätigen Sie, dass Ihre Auswahl korrekt ist, bevor Sie löschen.