Wie entfernt man alle Duplikate in Excel und behält dabei jeweils nur einen Eintrag?
Dieses Tutorial stellt Methoden vor, um alle doppelten Werte aus einer Liste zu entfernen – mit Ausnahme eines verbleibenden Duplikats. Lesen Sie die Details:
Alle Duplikate entfernen, aber nur eines mit der Duplikate entfernen-Funktion behalten
Alle Duplikate entfernen, aber nur eines mit VBA behalten
Alle Duplikate entfernen, aber nur eines mit Kutools für Excel 
Alle Doppelte Zeile zusammenführen und Daten mit Kutools für Excel behalten
Alle Duplikate entfernen, aber nur eines mit der Duplikate entfernen-Funktion behalten
In Excel hilft die Funktion „Duplikate entfernen“, alle doppelten Einträge bis auf einen zu löschen.
1. Wählen Sie die gewünschte Datenliste aus und klicken Sie auf Daten > Duplikate entfernen. Siehe Screenshot:
2. Aktivieren Sie im Duplikate entfernen-Dialogfeld das Kontrollkästchen für die Spalte, aus der Sie Duplikate entfernen möchten. Falls Ihre Daten eine Überschrift enthalten, aktivieren Sie auch die Option Titel einschließen. Siehe Screenshot:
3. Klicken Sie auf OK. Ein Dialogfeld zeigt an, wie viele Duplikate entfernt wurden – einfach schließen. Alle Duplikate wurden nun bis auf jeweils einen Eintrag aus der Liste entfernt.
Alle Duplikate entfernen, aber nur eines mit VBA behalten
Falls Sie an VBA interessiert sind, stellen wir Ihnen hier gerne auch einen passenden VBA-Code zur Lösung dieser Aufgabe vor.
1. Drücken Sie gleichzeitig die Tasten Alt+F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden VBA-Code in das neue Modul-Fenster ein.
VBA: Alle Duplikate entfernen – bis auf eines.
Sub RemoveAllDeplicateButOne()
Dim LR As Long: LR = Range("A" & Rows.Count).End(xlUp).Row
ActiveSheet.Range("A1:A" & LR).RemoveDuplicates Columns:=1, Header:=Name
End Sub3. Drücken Sie die Taste F5 oder klicken Sie auf Ausführen, um den VBA-Code auszuführen. Die Duplikate in der Liste in Spalte A wurden nun entfernt – jeweils ein Wert bleibt erhalten.
Tipp: Im obigen VBA-Code steht „A“ für Spalte A und „A1:A“ für den Listebereich. Sie können diese Angaben ganz einfach an Ihre Bedürfnisse anpassen.
Alle Duplikate entfernen, aber nur eines mit Kutools für Excel behalten
In Kutools für Excel gibt es ein leistungsstarkes Hilfsprogramm namens Doppelte/ Eindeutige Zellen auswählen, mit dem Sie im Handumdrehen alle Duplikate – bis auf das erste Vorkommen – markieren, hervorheben und anschließend entfernen können.
Nach der kostenlosen Installationvon Kutools für Excel gehen Sie wie folgt vor:
1. Wählen Sie den Datenbereich aus und klicken Sie auf Kutools > Auswählen > Doppelte/ Eindeutige Zellen auswählen. Siehe Screenshot:
2. Aktivieren Sie im angezeigten Dialogfeld die Option Doppelte Werte (Erster Treffer ausgeschlossen), und klicken Sie auf OK. Siehe Screenshot:
3. Anschließend erscheint ein Dialogfeld, das Sie über die Anzahl der ausgewählten Zellen informiert. Klicken Sie einfach auf OK, um es zu schließen. Siehe Screenshot:
4. Nun sind alle Duplikate außer dem ersten markiert. Drücken Sie die Entf-Taste, um sie zu löschen.
Tipp:Sie können alle Duplikate ebenfalls mit Doppelte/ Eindeutige Zellen auswählenwie folgt entfernen, aber jeweils eines behalten:
Wählen Sie alle eindeutigen Werte – einschließlich des ersten Duplikats – aus, kopieren Sie sie mit Strg + C und fügen Sie sie an einem anderen Ort mit Strg + V ein.
Demo: Alle Duplikate entfernen, aber nur eines behalten
Alle Doppelte Zeile zusammenführen und Daten mit Kutools für Excel behalten
Wenn Sie Daten besitzen und doppelte Zeilen zusammenführen möchten, dabei aber die zugehörigen Daten – wie im folgenden Screenshot gezeigt – erhalten bleiben sollen, können Sie die Funktion Kutools für Excel’s Erweiterte Zeilen zusammenführen verwenden.
Nach der kostenlosen Installationvon Kutools für Excel gehen Sie wie folgt vor:
1. Wählen Sie die Daten aus und klicken Sie auf Kutools > Vereinigen/Aufteilen > Erweiterte Zeilen zusammenführen. Siehe Screenshot:
2. Wählen Sie im Dialogfeld Zeilen kombinieren basierend auf Spalte die Spalte aus, aus der Duplikate entfernt werden sollen, und klicken Sie auf Primärschlüssel, um sie als Schlüsselspalte festzulegen. Siehe Screenshot:
3. Wählen Sie anschließend die Spalte aus, deren Daten Sie behalten möchten, und klicken Sie auf Kombinieren. Anschließend wählen Sie ein Trennzeichen aus der Liste aus. Siehe Screenshot:
4. Klicken Sie auf OK, und die doppelten Zeilen werden zusammengeführt, wobei die zugehörigen Daten erhalten bleiben.
Demo: Duplikate zusammenführen, aber benachbarte Daten behalten
Verwandte Artikel:
- Wie kombiniert man mehrere Zellen, die führende Nullen enthalten, zu einer einzigen Zelle in Excel?
- Wie generiert man in Excel eine Zufallszahl ohne Duplikate?
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 zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins