KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe verwijder ik alle duplicaten in Excel, maar behoud ik er toch één?

AuteurSun Wijzigingsdatum

Deze handleiding laat je handige trucs zien om alle dubbele waarden uit een lijst te verwijderen en slechts één exemplaar te behouden in Excel. Lees de details:

Verwijder alle duplicaten maar behoud er slechts één met de Dubbele items verwijderen-functie

Verwijder alle duplicaten maar behoud er slechts één met VBA

Verwijder alle duplicaten maar behoud er slechts één met Kutools voor Excel goed idee3

Combineer alle Dubbele rij en behoud gegevens met Kutools voor Excel goed idee3


Verwijder alle duplicaten maar behoud er slechts één met de Dubbele items verwijderen-functie

In Excel helpt de functie Duplicaten verwijderen u alle dubbele rijen te verwijderen, behalve één exemplaar.

1. Selecteer de gegevenslijst die u nodig hebt en klik op Gegevens > Dubbele items verwijderen. Zie de schermafbeelding:

Knop Dubbele waarden verwijderen op het tabblad Gegevens in het lint

2. Vervolgens vinkt u in het Dubbele items verwijderen-dialoogvenster de kolomnaam aan waarvan u dubbele items wilt verwijderen. Als uw gegevens een koptekst bevatten, vinkt u ook de optie Titels opnemen aan. Zie schermafbeelding:

Dialoogvenster Dubbele waarden verwijderen

3. Klik op OK. Er verschijnt een dialoogvenster met het aantal verwijderde duplicaten; sluit dit gewoon. Alle duplicaten zijn nu verwijderd, behalve één exemplaar in de lijst.

Succesdialoog


Verwijder alle duplicaten maar behoud er slechts één met VBA

Bent u geïnteresseerd in VBA? Dan kan ik hier ook een VBA-code introduceren om deze taak op te lossen.

1. Druk tegelijkertijd op Alt+F11 om het venster Microsoft Visual Basic for Applications te openen.

2. Klik op Invoegen > Module en plak de onderstaande VBA-code in het nieuwe Module-venster.

VBA: Verwijder alle duplicaten, maar behoud er één.

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 Sub

3. Druk op F5 of klik op Uitvoeren om de VBA uit te voeren. De duplicaten in de lijst in kolom A zijn nu verwijderd, behalve één exemplaar.

Tip: In de bovenstaande VBA-code staat kolom A voor kolom A en A1:A voor het lijstbereik; u kunt deze naar wens aanpassen.


Verwijder alle duplicaten maar behoud er slechts één met Kutools voor Excel

Er is een krachtig hulpmiddel in Kutools voor Excel met de naam Selecteer duplicaat/unieke cellen waarmee u snel alle duplicaten kunt selecteren of markeren – behalve het eerste exemplaar – zodat u ze daarna eenvoudig kunt verwijderen.

Kutools voor Excelbiedt meer dan 300 geavanceerde functies om complexe taken te stroomlijnen, waardoor creativiteit en efficiëntie worden verhoogd.Geïntegreerd met AI-mogelijkheden, automatiseert Kutools taken met precisie, zodat databeheer moeiteloos verloopt.Gedetailleerde informatie over Kutools voor Excel...         Gratis proefversie...

Na gratis installerenKutools voor Excel, gaat u als volgt te werk:

1. Selecteer het gegevensbereik en klik op Kutools > Selecteren > Selecteer duplicaat/unieke cellen. Zie schermafbeelding:

Optie Dubbele en unieke cellen selecteren op het Kutools-tabblad in het lint

2. Vink in het weergegeven dialoogvenster de optie Duplicaatwaarden (Eerste overeenkomst uitsluiten) aan en klik op Ok. Zie schermafbeelding:

Dialoogvenster Dubbele en unieke cellen selecteren

3. Vervolgens verschijnt een dialoogvenster met een herinnering over het aantal geselecteerde cellen. Klik gewoon op OK om het te sluiten. Zie schermafbeelding:

Succesdialoog

4. Alle duplicaten, behalve het eerste exemplaar, zijn nu geselecteerd. Druk op Delete om ze te verwijderen.

Alle duplicaten behalve de eerste zijn geselecteerd

Tip:U kunt ook alle duplicaten verwijderen maar er één behouden met Selecteer duplicaat/unieke cellenzoals hierna:

Selecteer alle unieke waarden, inclusief de eerste exemplaren van duplicaten, en kopieer ze door op Ctrl + C te drukken. Plak ze daarna op een andere locatie met Ctrl + V.

Dialoogvenster Dubbele en unieke cellen selecteren met de optie Alle unieke aangevinkt9

Demo: Verwijder alle duplicaten maar behoud er slechts één

Kutools voor Excel: Meer dan 300 handige tools binnen handbereik! Profiteer van AI-ondersteunde functies voor slimmer en sneller werken!Nu downloaden!

Combineer alle Dubbele rij en behoud gegevens met Kutools voor Excel

Als u bepaalde gegevens heeft en rijen met dubbele waarden wilt combineren, waarbij u de bijbehorende gegevens behoudt zoals op de onderstaande schermafbeelding is weergegeven, kunt u de functie Kutools voor Excel’s Geavanceerd samenvoegen van rijen gebruiken.

Illustratie van het samenvoegen van dubbele rijen en het behouden van de bijbehorende gegevens

Na gratis installerenKutools voor Excel, gaat u als volgt te werk:

1. Selecteer de gegevens en klik op Kutools > Samenvoegen en splitsen > Geavanceerd samenvoegen van rijen. Zie schermafbeelding:

Optie Geavanceerde rijen combineren op het Kutools-tabblad in het lint

2. Selecteer in het dialoogvenster Rijen samenvoegen op basis van kolom de kolom waaruit u duplicaten wilt verwijderen en klik op Primaire sleutel om deze als sleutelkolom in te stellen. Zie schermafbeelding:

Dialoogvenster Rijen combineren op basis van kolom met de knop Primaire sleutel gemarkeerd

3. Selecteer vervolgens de kolom waarvan u alleen de gegevens wilt behouden, klik op Combineren en kies een scheidingsteken uit de lijst. Zie schermafbeelding:

Dialoogvenster Rijen combineren op basis van kolom met de knop Combineren gemarkeerd

4. Klik op Ok en de dubbele rijen worden gecombineerd, waarbij de bijbehorende gegevens behouden blijven.

Dubbele rijen zijn gecombineerd en de bijbehorende gegevens zijn behouden

Demo: Combineer duplicaten maar behoud aangrenzende gegevens

Kutools voor Excel: Meer dan 300 handige tools binnen handbereik! Profiteer van AI-ondersteunde functies voor slimmer en sneller werken!Nu downloaden!

Gerelateerde artikelen:

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...


Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

  • Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
  • Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!

Alle Kutools-add-ins in één installatieprogramma.

Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
  • Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
  • Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
  • 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
  • Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins