Hoppa till huvudinnehåll

Hur tar jag bort alla dubbletter men behåller bara en i Excel?

Denna handledning introducerar knep för att ta bort alla dubbletter från en lista men behåll bara ett i Excel, läs detaljerna:

Ta bort alla dubbletter men behåll bara en med funktionen Ta bort dubbletter

Ta bort alla dubbletter men behåll bara en med VBA

Ta bort alla dubbletter men behåll bara en med Kutools för Excel bra idé3

Kombinera alla dubbla rader och behåll data med Kutools för Excel bra idé3


I Excel kan funktionen Ta bort duplikat hjälpa dig att ta bort alla utom behålla ett duplikatvärde.

1. Välj den datalista du behöver och klicka på Data > Ta bort dubbletter. Se skärmdump:

doc ta bort dubbletter behåll en 1

2. Sedan in Ta bort dubbletter dialogrutan, kontrollera kolumnnamnet som du vill ta bort dubbletter från, och om dina data har rubrik, kontrollera Mina data har rubriker alternativ också. Se skärmdump:

doc ta bort dubbletter behåll en 2

3. klick OK. Och en dialog dyker upp för att berätta hur många dubbletter som har tagits bort, bara stäng den. Och nu har alla dubbletter tagits bort men behåll bara en i listan.

doc ta bort dubbletter behåll en 3


Om du är intresserad av VBA, här kan jag också införa en VBA-kod för att lösa denna uppgift.

1. Tryck Alt + F11 samtidigt för att öppna Microsoft Visual Basic för applikations fönster.

2. klick Insert > Modulernaoch klistra in under VBA till det nya Modulerna fönster.

VBA: Ta bort alla dubbletter men behåll en.

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. Tryck F5 eller klicka Körning för att utföra VBA, och dubbletterna i listan i kolumn A har tagits bort men behåll en.

Dricks: I ovanstående VBA indikerar A kolumnen A och A1: A indikerar listområdet, du kan ändra dem efter behov.


Det finns ett kraftfullt verktyg i Kutools för Excel som heter Välj Duplicera och unika celler kan snabbt markera eller markera alla dubbletter utom den första, och sedan kan du ta bort dem.

Kutools för Excel, med mer än 300 praktiska funktioner, gör dina jobb enklare. 

Efter gratis installation Kutools för Excel, gör så här:

1. Välj dataområdet och klicka Kutools > Välja > Välj Duplicera och unika celler. Se skärmdump:

doc ta bort dulicate behåll en 15

2. Kontrollera i dialogrutan som visas Dubbletter (utom 1: a) alternativet och klicka på Ok. Se skärmdump:

doc ta bort dubbletter behåll en 5

3. Sedan dyker en dialog upp för att påminna dig om antalet valda celler. Och klicka bara OK för att stänga den. Se skärmdump:

doc ta bort dubbletter behåll en 6

4. Och alla dubbletter utom den första väljs, tryck på Radera för att rensa dem.

doc ta bort dubbletter behåll en 7

Dricks: Du kan också ta bort alla dubbletter men behålla en med Välj Duplicera och unika celler så här:

Markera alla unika värden inklusive de första dubbletterna och kopiera dem genom att trycka på Ctrl + C och klistra in till en annan plats av Ctrl + V.

doc ta bort dubbletter behåll en 8doc ta bort dubbletter behåll en 9

Om du har lite data, och vad du vill är att kombinera de dubbla raderna, behåll sedan motsvarande data enligt nedanstående skärmdump, du kan använda Kutools för ExcelÄr Avancerade kombinera rader funktion.

doc ta bort dubbletter behåll en 10

Efter gratis installation Kutools för Excel, gör så här:

1. Välj data och klicka Kutools > Slå ihop och dela > Avancerade kombinera rader. Se skärmdump:

doc ta bort dulicate behåll en 16

2. I Kombinera rader baserat på kolumn Välj den kolumn du vill ta bort duplikat från och klicka Primärnyckel för att göra det som den primära nyckelkolumnen Se skärmdump:

doc ta bort dubbletter behåll en 12

3. Markera sedan den kolumn du bara vill behålla data och klicka sedan på Kombineraoch välj en avgränsare från listan. Se skärmdump:

doc ta bort dubbletter behåll en 13

4. klick Okoch de dubbla raderna kombineras och behåller motsvarande data.

doc ta bort dubbletter behåll en 14


Relativa artiklar:

Bästa kontorsproduktivitetsverktyg

Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50 + Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

kte-flik 201905


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations