Vba: so entfernen sie doppelte werte

Mit den folgenden Methoden können Sie doppelte Werte in VBA entfernen:

Methode 1: Entfernen Sie doppelte Werte basierend auf einer Spalte

 Sub RemoveDuplicates()
    Range(" A1:C11 ").RemoveDuplicates Columns:=1, Header:=xlYes
End Sub

In diesem speziellen Beispiel werden doppelte Zeilen im Bereich A1:C11 basierend auf den doppelten Werten in der ersten Spalte des Bereichs entfernt.

Das Argument Header:=xlYes gibt an, dass die erste Zeile im Bereich eine Kopfzeile ist und bei der Suche nach Duplikaten nicht berücksichtigt werden sollte.

Methode 2: Entfernen Sie doppelte Werte basierend auf mehreren Spalten

 Sub RemoveDuplicates()
    Range(" A1:C11 ").RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
End Sub

In diesem speziellen Beispiel werden doppelte Zeilen im Bereich A1:C11 basierend auf den doppelten Werten in den ersten beiden Spalten des Bereichs entfernt.

Die folgenden Beispiele zeigen, wie Sie jede dieser Methoden in der Praxis mit dem folgenden Datensatz in Excel anwenden können:

Beispiel 1: Entfernen Sie doppelte Werte basierend auf einer Spalte

Wir können das folgende Makro erstellen, um Zeilen zu entfernen, die in der ersten Spalte doppelte Werte haben:

 Sub RemoveDuplicates()
    Range(" A1:C11 ").RemoveDuplicates Columns:=1, Header:=xlYes
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass jede Zeile mit einem doppelten Wert in der ersten Spalte des Datensatzes entfernt wurde.

Beispiel 2: Entfernen Sie doppelte Werte basierend auf mehreren Spalten

Wir können das folgende Makro erstellen, um Zeilen zu entfernen, die in den ersten beiden Spalten doppelte Werte haben:

 Sub RemoveDuplicates()
    Range(" A1:C11 ").RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass jede Zeile mit doppelten Werten in den ersten beiden Spalten des Datensatzes entfernt wurde.

Hinweis : Die vollständige Dokumentation zur VBA-Methode RemoveDuplicates finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So fügen Sie Werte in einem Bereich hinzu
VBA: So berechnen Sie den Durchschnittswert des Bereichs
VBA: So zählen Sie eindeutige Werte im Bereich