Vba: hoe dubbele waarden te verwijderen

U kunt de volgende methoden gebruiken om dubbele waarden in VBA te verwijderen:

Methode 1: Verwijder dubbele waarden op basis van een kolom

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

Dit specifieke voorbeeld verwijdert dubbele rijen in het bereik A1:C11 op basis van de dubbele waarden in de eerste kolom van het bereik.

Het argument Header:=xlYes geeft aan dat de eerste regel in het bereik een kopregel is en dat er geen rekening mee moet worden gehouden bij het controleren op duplicaten.

Methode 2: Verwijder dubbele waarden op basis van meerdere kolommen

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

Dit specifieke voorbeeld verwijdert dubbele rijen in het bereik A1:C11 op basis van de dubbele waarden in de eerste twee kolommen van het bereik.

De volgende voorbeelden laten zien hoe u elk van deze methoden in de praktijk kunt gebruiken met de volgende gegevensset in Excel:

Voorbeeld 1: Dubbele waarden verwijderen op basis van een kolom

We kunnen de volgende macro maken om rijen met dubbele waarden in de eerste kolom te verwijderen:

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

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Houd er rekening mee dat elke rij met een dubbele waarde in de eerste kolom van de gegevensset is verwijderd.

Voorbeeld 2: Verwijder dubbele waarden op basis van meerdere kolommen

We kunnen de volgende macro maken om rijen met dubbele waarden in de eerste twee kolommen te verwijderen:

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

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Houd er rekening mee dat elke rij met dubbele waarden in de eerste twee kolommen van de dataset is verwijderd.

Opmerking : u kunt hier de volledige documentatie voor de VBA RemoveDuplicates- methode vinden.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

VBA: waarden toevoegen in een bereik
VBA: Hoe de gemiddelde waarde van het bereik te berekenen
VBA: unieke waarden binnen bereik tellen