Ugrás a tartalomra

Hogyan lehet gyorsan létrehozni egyedi listát (eltávolítani az ismétlődéseket) az Excel adott oszlopából?

Tegyük fel, hogy van egy névlista duplikátumokkal, és most új listát szeretne létrehozni az egyedi nevekről az adott oszlopból. Hogyan oldhatná meg az Excelben? Ez az oktatóanyag néhány trükköt mutat be, amelyek segítségével gyorsan létrehozhat egy egyedi listát egy adok oszlopból.

Hozzon létre egyedi listát az Speciális szűrő oszlopból

Hozzon létre egyedi listát az oszlopból a VBA segítségével

Hozzon létre gyorsan egyedi listát az oszlopból a Kutools for Excel segítségével jó ötlet3


nyíl kék jobb buborék Hozzon létre egyedi listát az Speciális szűrő oszlopból

Az Excelben a Speciális szűrő funkciót alkalmazhatja az egyedi adatok kiszűrésére a listából.

1. kettyenés dátum > Részletes. Lásd a képernyőképet:

doc egyedi lista létrehozása 1

2. Ban,-ben Speciális szűrő párbeszédpanelt tegye az alábbiak szerint:

(1) Ellenőrizze Másolás más helyre lehetőség és Csak egyedi nyilvántartások választási lehetőség;

(2) Válassza a duplikát oszlopot a következőre: Lista tartomány szövegmezőt, és jelöljön ki egy cellát, amelyre az egyedi listát fel szeretné helyezni Másold szövegdoboz.

doc egyedi lista létrehozása 2

3. kettyenés OK. Most elkészült az egyedi lista. Lásd a képernyőképet:

doc egyedi lista létrehozása 3


nyíl kék jobb buborék Hozzon létre egyedi listát az oszlopból a VBA segítségével

Az Excelben a VBA kóddal egyedi listát is létrehozhat egy adott oszlopból.

1. nyomja meg Alt + F11 megmutatni Microsoft Visual Basic for Applications ablakot, és kattintson rá betétlap > Modulok, majd másolja és illessze be a VBA alá az új modul ablakba.

VBA: Hozzon létre egyedi listát az adott oszlopból.

Sub CreateUniqueList()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
InputRng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=OutRng, Unique:=True
End Sub

2. nyomja meg F5 kulcs vagy futás gombot a VBA kód engedélyezéséhez, és a felbukkanó párbeszédpanelen válassza ki a duplikátumok listáját, majd kattintson a gombra OK, majd válasszon egy cellát az eredmény feladásához. Képernyőképek megtekintése:

doc egyedi lista létrehozása 4
doc egyedi lista létrehozása 5

3. Most egy egyedi nevű lista készült.


nyíl kék jobb buborék Hozzon létre gyorsan egyedi listát az oszlopból a Kutools for Excel segítségével

Valójában azzal Válassza az Ismétlődő és egyedi cellák lehetőséget jellemzője Kutools az Excel számára, akkor gyorsan létrehozhat egyedi listát is egy adott oszlopból.

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

A Kutools for Excel ingyenes telepítése után használhatja a Select Duplicate & Unique Cells alkalmazást.

1. Jelölje ki azt a listát (opcionális az oszlopfejléc kiválasztása), amely alapján egyedi listát szeretne létrehozni, majd kattintson a gombra Kutools > választ > Válassza az Ismétlődő és egyedi cellák lehetőséget. Lásd a képernyőképet:

doc egyedi létrehozása 4

2. A felbukkanó párbeszédpanelen ellenőrizze Minden egyedi (az 1. duplikátumokat is beleértve) opció alatt Szabály szakasz. Lásd a képernyőképet:

doc egyedi létrehozása 5

3. kettyenés Ok, majd megjelenik egy párbeszédpanel, amely emlékezteti a kiválasztott cellák számát. Lásd a képernyőképet:

doc egyedi létrehozása 2

4. kettyenés OK, Majd nyomja meg a gombot Ctrl + C a kijelölt cellák másolásához, és válassza ki a cellát, majd nyomja meg a gombot Ctrl + V gombokat az eredmény feladásához.

doc egyedi létrehozása 3

Tip: Ha kis- és nagybetű érzékeny értékeket szeretne kiválasztani, ellenőrizheti Kis-nagybetű érzékeny lehetőség a Válassza az Ismétlődő és egyedi cellák lehetőséget párbeszéd.

A Válassza az Ismétlődő és egyedi cellák lehetőséget funkcióval, csak az elsőt tartalmazó példányokat választhatja ki, az első kivételével csak a duplikátumokat választhatja ki, és az első kivételével minden egyedi értéket kiválaszthat. Szerezze be most, és megkönnyíti az Excel munkáját.

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz 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!
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