Note: The other languages of the website are Google-translated. Back to English

Hogyan lehet eltávolítani az összes másolatot, de csak egyet megtartani az Excelben?

Ez az oktatóanyag bemutatja azokat a trükköket, amelyekkel törölhet minden duplikált értéket egy listáról, de csak egyet tarthat az Excelben, olvassa el a részleteket:

Távolítson el minden másolatot, de csak egyet tartson meg az Ismétlődések eltávolítása funkcióval

Távolítson el minden másolatot, de csak egyet tartson meg a VBA-val

Távolítsa el az összes másolatot, de csak egyet tartson a Kutools for Excel programmal jó ötlet3

Kombinálja az összes duplikált sort és tárolja az adatokat a Kutools for Excel programmal jó ötlet3


Az Excelben az Ismétlődések eltávolítása funkció segít eltávolítani az összes másolatot, csak egy duplikátum értéket.

1. Válassza ki a szükséges adatlistát, majd kattintson a gombra dátum > Távolítsa el a másolatokat. Lásd a képernyőképet:

doc távolítsa el a másolatot, tartson egyet 1

2. Majd be Távolítsa el a másolatokat párbeszédpanelen ellenőrizze az oszlop nevét, amelyből el szeretné távolítani a duplikátumokat, és ha az adatok fejlécet tartalmaznak, ellenőrizze Adataim fejléceket tartalmaznak lehetőség is. Lásd a képernyőképet:

doc távolítsa el a másolatot, tartson egyet 2

3. kettyenés OK. És megjelenik egy párbeszédpanel, amely megmondja, hány ismétlődést távolítottak el, csak zárja be. És most minden másolatot eltávolítottak, de csak egyet tart a listában.

doc távolítsa el a másolatot, tartson egyet 3


Ha érdekli a VBA, itt bemutathatok egy VBA kódot is a feladat megoldására.

1. nyomja meg Alt + F11 gombokat egyidejűleg a megnyitáshoz Microsoft Visual Basic alkalmazásokhozs ablak.

2. kettyenés betétlap > Modulok, és illessze be a VBA alá az újba Modulok ablak.

VBA: Távolítson el minden másolatot, de tartson meg egyet.

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. nyomja meg F5 vagy kattintson futás a VBA végrehajtásához, és az A oszlopban lévő listában szereplő duplikátumokat eltávolítottuk, de egyet meg kell tartani.

Tipp: A fenti VBA-ban A jelöli az A oszlopot, az A1: A pedig a listatartományt, szükség szerint módosíthatja őket.


Van egy hatékony segédprogram a Kutools az Excel számára nevezett Válassza az Ismétlődő és egyedi cellák lehetőséget gyorsan kiválaszthatja vagy kiemelheti az összes másolatot, kivéve az elsőt, majd eltávolíthatja őket.

Kutools az Excel számára, Több mint 300 a praktikus funkciók megkönnyítik a munkáját. 

Után ingyenes telepítés Kutools for Excel, kérjük, tegye az alábbiak szerint:

1. Válassza ki az adattartományt, majd kattintson Kutools > választ > Válassza az Ismétlődő és egyedi cellák lehetőséget. Lásd a képernyőképet:

doc távolítsa el a dulikátot tartsa meg az egyiket 15

2. A megjelenő párbeszédpanelen ellenőrizze Másolatok (az 1. kivételével) opciót, és kattintson rá Ok. Lásd a képernyőképet:

doc távolítsa el a másolatot, tartson egyet 5

3. Ezután megjelenik egy párbeszédpanel, amely emlékezteti a kiválasztott cellák számát. És csak kattints OK hogy bezárja. Lásd a képernyőképet:

doc távolítsa el a másolatot, tartson egyet 6

4. És az összes másolat kiválasztása, kivéve az elsőt, nyomja meg a gombot töröl kulcs a törlésükhöz.

doc távolítsa el a másolatot, tartson egyet 7

Tipp: Eltávolíthatja az összes másolatot, de egyet megőrizhet Válassza az Ismétlődő és egyedi cellák lehetőséget mint ez:

Jelölje ki az összes egyedi értéket, beleértve az első duplikátumokat, majd másolja azokat a megnyomásával Ctrl + C és illessze be egy másik helyre Ctrl + V.

doc távolítsa el a másolatot, tartson egyet 8doc távolítsa el a másolatot, tartson egyet 9

Ha van néhány adata, és azt szeretné, hogy egyesítse az ismétlődő sorokat, akkor őrizze meg a megfelelő adatokat az alábbi képernyőképen, használhatja Kutools az Excel számára'S Haladó kombinált sorok funkciót.

doc távolítsa el a másolatot, tartson egyet 10

Után ingyenes telepítés Kutools for Excel, kérjük, tegye az alábbiak szerint:

1. Válassza ki az adatokat, majd kattintson Kutools > Egyesítés és felosztás > Haladó kombinált sorok. Lásd a képernyőképet:

doc távolítsa el a dulikátot tartsa meg az egyiket 16

2. Ban,-ben Kombinálja a sorokat az oszlop alapján párbeszédpanelen válassza ki azt az oszlopot, amelyből el kívánja távolítani a duplikátumot, majd kattintson a gombra Elsődleges kulcs hogy ez legyen az elsődleges kulcs oszlop. Lásd a képernyőképet:

doc távolítsa el a másolatot, tartson egyet 12

3. Ezután válassza ki azt az oszlopot, amelybe csak meg kívánja őrizni az adatokat, majd kattintson a gombra Kombájn, és válasszon ki egy elválasztót a listából. Lásd a képernyőképet:

doc távolítsa el a másolatot, tartson egyet 13

4. kettyenés Ok, és az ismétlődő sorok egyesülnek, és megőrzik a megfelelő adatokat.

doc távolítsa el a másolatot, tartson egyet 14


Relatív cikkek:


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (0)
Még nincs értékelés. Legyen Ön az első, aki értékel!
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi