Hogyan nyerhetünk ki egyedi értékeket az Excel több oszlopából?

Tegyük fel, hogy több oszlop van több értékkel, néhány érték megismétlődik ugyanabban az oszlopban vagy más oszlopban. Most pedig meg akarja találni azokat az értékeket, amelyek mindkét oszlopban csak egyszer szerepelnek. Vannak gyors trükkök az egyedi értékek kinyeréséhez az Excel több oszlopából?

• Kivonat egyedi értékeket tömbképlettel több oszlopból
• Kivonat egyedi értékeket több oszlopból a Pivot Table segítségével
• Kivonat egyedi értékeket több oszlopból VBA kóddal
• Kivonat egyedi értékeket egyetlen oszlopból, csodálatos funkcióval

Kivonat egyedi értékeket tömbképlettel több oszlopból

Itt található egy tömbképlet, amely segít kivonni az egyedi értékeket több oszlopból.

1. Ha feltételezzük, hogy értékei a tartományban vannak A2: C9, kérjük, írja be a következő képletet az E2 cellába:

2. Ezután nyomja meg a gombot Shift + Ctrl + Enter gombokat, majd húzza a kitöltő fogantyút az egyedi értékek kibontásához, amíg üres cellák nem jelennek meg. Lásd a képernyőképet:

Kivonat egyedi értékeket több oszlopból a Pivot Table segítségével

Ha ismeri a kimutató táblázatot, az alábbi lépésekkel könnyedén kivonhatja az egyedi értékeket több oszlopból:

1. Először kérjük, helyezzen be egy új üres oszlopot az adatai bal oldalán, ebben a példában az A oszlopot illesztem be az eredeti adatok mellé.

2. Kattintson az adatok egyik cellájára, majd nyomja meg az gombot Alt + D gombokat, majd nyomja meg a gombot P azonnal nyissa meg a PivotTable és PivotChart varázsló, választ Több konszolidációs tartomány a varázsló 1. lépésében lásd a képernyőképet:

3. Ezután kattintson Következő gombot, ellenőrizze Hozzon létre egyoldalas mezőt számomra opció a varázsló 2. lépésében, lásd a képernyőképet:

4. Kattintson a gombra Következő gombra kattintva válassza ki azt az adattartományt, amely tartalmazza a bal oldali új oszlopot is, majd kattintson a gombra hozzáad gomb az adattartomány hozzáadásához a Minden tartomány lista mező, lásd a képernyőképet:

5. Az adattartomány kiválasztása után kattintson a tovább gombra Következő, a varázsló 3. lépésében válassza ki, hová kívánja helyezni a kimutatás táblázatot.

6. Végül kattintson befejez a varázsló befejezéséhez, és az aktuális munkalapon létrejött egy pivot tábla, majd törölje az összes mező jelölését Válassza ki a jelentéshez hozzáadni kívánt mezőket szakasz, lásd a képernyőképet:

7. Ezután ellenőrizze a mezőt Érték vagy húzza az Értéket a Sorok címkét, akkor a több oszlopból az alábbiak szerint kapja meg az egyedi értékeket:

Kivonat egyedi értékeket több oszlopból VBA kóddal

A következő VBA-kóddal több oszlopból is kivonhatja az egyedi értékeket.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablakba.

VBA: Kivonat egyedi értékeket több oszlopból

Sub Uniquedata()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Set dt = CreateObject("Scripting.Dictionary")
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)
For Each rng In InputRng
    If rng.Value <> "" Then
        dt(rng.Value) = ""
    End If
Next
OutRng.Range("A1").Resize(dt.Count) = Application.WorksheetFunction.Transpose(dt.Keys)
End Sub

3. Ezután nyomja meg a gombot F5 a kód futtatásához, és megjelenik egy felszólító mező, amely emlékezteti Önt a használni kívánt adattartomány kiválasztására. Lásd a képernyőképet:

4. Kattintson a gombra OK, megjelenik egy másik prompt doboz, amely lehetővé teszi, hogy kiválasszon egy helyet az eredmény elhelyezéséhez, lásd a képernyőképet:

5. Kattints OK ennek a párbeszédpanelnek a bezárásához és az összes egyedi értéket egyszerre kinyerte.

Kivonat egyedi értékeket egyetlen oszlopból, csodálatos funkcióval

Néha egyetlen oszlopból kell kinyernie az egyedi értékeket, a fenti módszerek nem segítenek, itt egy hasznos eszközt tudok ajánlani-Kutools az Excel számára, Annak Kivonat egyedi értékű cellákat (az első másolatot is tartalmazza) segédprogrammal gyorsan kivonhatja az egyedi értékeket.

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Kattintson egy cellára, ahol ki szeretné adni az eredményt. (Megjegyzések: Ne kattintson egy cellára az első sorban.)

2. Ezután kattintson Kutools > Formula Segítő > Formula Segítő, lásd a képernyőképet:

3. Az Képletek segítője párbeszédpanelen tegye a következőket:

• választ szöveg lehetőség a Képlet típus legördülő lista;
• Ezután válasszon Kivonat egyedi értékű cellákat (az első másolatot is tartalmazza) tól Válasszon egy fromulát lista mező;
• Jobbra Érvek bevitele szakaszban válassza ki az egyedi értékeket kibontani kívánt cellák listáját.

4. Ezután kattintson Ok gombot, és húzza át a kitöltő fogantyút azokra a cellákra, amelyek fel akarják sorolni az összes egyedi értéket, amíg üres cellák nem jelennek meg, lásd a képernyőképet:

Ingyenes letöltés Kutools for Excel most!

Relatívabb 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.

Tovább ... Ingyenes letöltés... Vásárlás... 

---

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!

Tovább ... Ingyenes letöltés... Vásárlás...