Inhoudsopgave
Een van de belangrijkste activiteiten in Excel is het duplicaten verwijderen Vandaag laat ik zien hoe je duplicaten in Excel kunt verwijderen met alleen VBA.
Download Praktijk werkboek
Duplicaten verwijderen in Excel met VBA.xlsm3 snelle methoden om VBA in Excel te gebruiken om duplicaten te verwijderen
Hier hebben we een dataset met de Namen, ID's, Merktekens, en Rangen in het examen van enkele leerlingen van een school genaamd Sunflower Kindergarten.
Als u goed kijkt, zult u zien dat sommige namen abusievelijk zijn herhaald.
Vandaag is ons doel de dubbele waarden te verwijderen met behulp van Excel VBA.
1. VBA gebruiken om duplicaten uit een vast celbereik te verwijderen
Allereerst zullen we proberen om verwijder de dubbele namen met behulp van een vast celbereik in de VBA code.
Hier is onze gegevensverzameling het bereik B3:E15 in de werkmap (inclusief de Kolomkoppen ).
Wij zullen dit vaste celbereik hier in de code gebruiken.
Stap 1:
Open een nieuwe VBA venster en voeg een nieuwe module in (Klik hier om te zien hoe je een nieuwe VBA-module opent en invoegt in Excel).
➤ Plaats deze code in de module:
Code:
Sub Remove_Duplicates() Range("A3:E14").RemoveDuplicates Kolommen:=1, Kop:=xlJa Einde Sub
Het produceert een Macro genaamd Remove_Duplicates . A3:E14 is het bereik van mijn gegevensverzameling, en ik wil verwijder de dubbele rijen gebaseerd op Kolom 1 Je gebruikt die van jou.
Stap 2:
➤ Ga terug naar uw werkblad en voer deze Macro uit (Klik hier om te zien hoe u de Macro uitvoert).
Het zal de rijen met duplicaten in kolom 1 verwijderen ( Naam student).
Lees meer: Hoe Duplicaten verwijderen in Excel maar één behouden (7 Methodes)
2. VBA-codes invoegen om duplicaten uit geselecteerd celbereik te verwijderen
Nu gaan we proberen een macro te maken die duplicaten kan verwijderen uit elk geselecteerd celbereik in het werkblad.
Stap 1:
Open een nieuwe VBA en voeg een nieuwe module in.
➤ Plaats deze code in de module:
Code:
Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Kolommen:=1, Header:=xlYes End Sub
Het produceert een Macro genaamd Remove_Duplicates Ik wil de dubbele rijen verwijderen op basis van Kolom 1 Je gebruikt die van jou.
Stap 2:
Kom terug naar je werkblad.
Selecteer uw gegevensreeks en voer deze macro uit.
➤ Het zal hetzelfde uitvoeren als hierboven. Verwijder de rijen met duplicaten in kolom 1 ( Naam student).
Lees meer: Hoe dubbele rijen verwijderen in Excel (3 manieren)
Vergelijkbare lezingen
- Hoe Duplicaten verwijderen uit kolommen in Excel (3 methoden)
- Excel VBA: Duplicaten verwijderen uit een matrix (2 voorbeelden)
- Duplicaten verwijderen en de eerste waarde behouden in Excel (5 methoden)
- Dubbele rijen verwijderen behalve de eerste keer dat ze voorkomen in Excel (7 manieren)
- Hoe te verwijderen beide duplicaten in Excel (5 eenvoudige manieren)
3. Een VBA-macro inbouwen om duplicaten uit meerdere kolommen te verwijderen
Tot nu toe hebben we de rijen met duplicaten in kolom 1 verwijderd ( Naam student ).
Maar in feite kunnen de namen van twee studenten hetzelfde zijn, het betekent niet altijd dat het per ongeluk is toegevoegd als twee namen hetzelfde zijn.
Maar als de ID's van twee studenten hetzelfde zijn, dan zijn ze dezelfde student. Dan moet de rij verwijderd worden.
Deze keer zullen we een Macro ontwikkelen die de rij zal verwijderen indien zowel de naam als de ID van twee rijen gelijk zijn.
Stap 1:
Open een nieuwe VBA en voeg een nieuwe module in.
➤ Plaats deze code in de module:
Code:
Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes End Sub
Het produceert een Macro genaamd Remove_Duplicates Ik wil de dubbele rijen verwijderen op basis van Kolom 1 en 2 (Naam en ID) Je gebruikt die van jou.
Stap 2:
Kom terug naar je werkblad.
Selecteer uw gegevensreeks en voer deze macro uit.
➤ Deze keer worden de rijen alleen verwijderd als zowel de naam als het leerling-ID hetzelfde zijn.
Let op: Hier heeft het Jennifer Marlo niet verwijderd omdat de ID's van de twee studenten verschillend zijn, dat wil zeggen dat het twee verschillende studenten zijn.
Lees meer: Excel VBA: Duplicaten verwijderen door meerdere kolommen te vergelijken (3 voorbeelden)
Conclusie
Met deze methoden kunt u duplicaten uit een gegevensverzameling in Excel verwijderen met behulp van VBA. Hebt u problemen? Vraag het ons gerust.