Zwei Excel-Tabellen vergleichen und doppelte Werte löschen
Schritt-für-Schritt-Anleitung
Um in Excel zwei Tabellen zu vergleichen und doppelte Werte zu löschen, kannst Du folgende Schritte ausführen:
-
Tabellen vorbereiten: Stelle sicher, dass Deine Tabellen (z.B. Tabelle 16 und Tabelle 17) korrekt aufgebaut sind. In diesem Beispiel wird die eindeutige Nummer zur Identifikation in Spalte C verwendet.
-
Makro erstellen:
- Öffne das Visual Basic for Applications (VBA) Fenster mit
ALT + F11.
- Wähle
Einfügen > Modul, um ein neues Modul zu erstellen.
- Füge den folgenden Code ein:
Sub DuplikateEntfernen()
Dim wsAlteMitglieder As Worksheet
Dim wsNeueMitglieder As Worksheet
Dim i As Long
Dim j As Long
Set wsAlteMitglieder = ThisWorkbook.Worksheets("Tabelle16")
Set wsNeueMitglieder = ThisWorkbook.Worksheets("Tabelle17")
For i = wsNeueMitglieder.Cells(wsNeueMitglieder.Rows.Count, 3).End(xlUp).Row To 2 Step -1
For j = 2 To wsAlteMitglieder.Cells(wsAlteMitglieder.Rows.Count, 3).End(xlUp).Row
If wsNeueMitglieder.Cells(i, 3).Value = wsAlteMitglieder.Cells(j, 3).Value Then
wsNeueMitglieder.Rows(i).Delete
Exit For
End If
Next j
Next i
End Sub
-
Makro ausführen: Kehre zu Excel zurück und drücke ALT + F8, wähle DuplikateEntfernen aus und klicke auf Ausführen. Dadurch werden alle doppelten Mitglieder aus Tabelle 17 entfernt.
-
Ergebnis überprüfen: Du solltest jetzt nur die neuen Mitglieder in Tabelle 17 sehen.
Häufige Fehler und Lösungen
-
Fehler: Makro funktioniert nicht
Lösung: Stelle sicher, dass Du die richtigen Tabellennamen im VBA-Code verwendest. Die Namen müssen exakt mit den Namen in Deinem Excel-Dokument übereinstimmen.
-
Fehler: Alle Daten gelöscht
Lösung: Überprüfe, ob die eindeutigen Nummern in Spalte C der beiden Tabellen korrekt sind und keine Leerzeichen oder zusätzliche Zeichen enthalten.
Alternative Methoden
Wenn Du kein Makro verwenden möchtest, kannst Du auch die Funktion „Bedingte Formatierung“ nutzen, um doppelte Werte zu markieren:
-
Markiere die Spalte C in Tabelle 17.
-
Gehe zu Start > Bedingte Formatierung > Neue Regel.
-
Wähle „Formel zur Ermittlung der zu formatierenden Zellen verwenden“ aus.
-
Gib folgende Formel ein:
=ZÄHLENWENN(Tabelle16!C:C; C1) > 0
-
Wähle ein Format aus und klicke auf OK. Das markiert alle doppelten Werte.
Praktische Beispiele
Angenommen, Du hast folgende Mitglieder in Tabelle 16 und 17:
| Tabelle 16 |
Nachname |
Vorname |
ID |
| Müller |
Max |
1 |
| Schmidt |
Anna |
2 |
| Tabelle 17 |
Nachname |
Vorname |
ID |
| Meier |
Julia |
1 |
| Becker |
Tim |
3 |
Nach dem Ausführen des Makros wird Tabelle 17 nur noch den Eintrag für Becker enthalten, da die ID 1 bereits in Tabelle 16 existiert.
Tipps für Profis
- Wenn Du oft mit mehreren Tabellen arbeitest, erwäge das Erstellen eines Add-Ins, das die Funktionalität zum Vergleichen und Löschen doppelter Werte integriert.
- Nutze die Funktion „SVERWEIS“, um in einer neuen Spalte anzuzeigen, ob ein Wert aus Tabelle 17 in Tabelle 16 vorhanden ist.
FAQ: Häufige Fragen
1. Frage
Wie kann ich doppelte Werte aus mehreren Tabellenblättern vergleichen?
Antwort: Du kannst die oben beschriebenen Methoden anpassen, indem Du Schleifen über mehrere Worksheets in Deinem VBA-Code hinzufügst.
2. Frage
Gibt es eine Möglichkeit, doppelte Werte automatisch zu filtern?
Antwort: Ja, Du kannst die Filterfunktion in Excel verwenden und zuerst die doppelten Werte markieren oder hervorheben, bevor Du sie filterst.