Hvordan å trekke ut unike verdier fra flere kolonner i

If Excel du er kjent med pivottabell, kan du enkelt hente ut de unike verdiene danne flere kolonner med følgende:
1. Ved første, kan du sette inn ett nytt blankt kolonne på venstre side av dine data, i dette eksempelet, vil jeg sette kolonne A ved siden av de opprinnelige dataene.
To. Klikk på en celle i dine data, og trykk Alt + D-tastene, og trykk deretter P-tasten umiddelbart for å åpne veiviseren for pivottabell og pivotdiagram, velger du Flere konsolidering områder i veiviseren trinn 1, se skjermbilde:
tre. Klikk på Neste-knappen, sjekk Opprett en enkelt side felt for meg alternativ i veiviseren trinn 2, se skjermbilde:
4. Gå på å klikke på Neste-knappen, klikk knappen for å velge dataområdet som blant annet venstre ny kolonne med celler, klikk på Legg til-knappen for å legge til dataområdet til alle områder listeboksen, se skjermbilde:
5. Når du har valgt dataområdet, fortsetter klikk på Neste i veiviseren trinn 3, velger hvor du vil plassere pivottabellrapporten som du vil.
6. Endelig, klikker du på Fullfør for å fullføre veiviseren, og en pivot tabell er opprettet i gjeldende regneark, så fjern alle feltene fra Choose feltene for å legge rapportere delen, se skjermbilde:
7. Så sjekk feltverdien eller dra Verdi til raden etiketter, nå får du de unike verdiene fra flere kolonner som følger:

Utdrag unike verdier fra flere kolonner med VBA-kode
Med følgende VBA-kode, kan du også trekke ut de unike verdiene fra flere kolonner.
1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window
VBA. Utdrag unike verdier fra flere kolonner
Sub Uniquedata () 'Update 20140814Dim rng Som RangeDim InputRng As Range, OutRng Som RangeSet dt = Create ("Scripting. ordbok ") xTitleId =" KutoolsforExcel "Set InputRng = Application.SelectionSet InputRng = Application.InputBox (" Range: ", xTitleId, InputRng.Address, Type: = 8) Sett OutRng = Application.InputBox (" Out satt til (enkelt celle ): ", xTitleId, Type: = 8) For Hver RNG I InputRng Hvis rng.Value < > "" Så dt (rng.Value) = "" End IfNextOutRng.Range ("A1"). Resize (dt.Count) = Application.WorksheetFunction.Transpose (dt.Keys) End Sub3. Deretter trykker F5 for å kjøre denne koden, og en rask boks vil komme ut for å minne deg velge dataene variere som du vil bruke. Se skjermbilde:
4. Og klikk deretter på OK, en annen rask boksen vises, slik at du velger et sted å sette resultatet, se skjermbilde:
5. Klikk OK for å lukke denne dialogen, og alle de unike verdiene er hentet på en gang.

Utdrag unike verdier fra en enkelt kolonne med Kutools for Excel
Noen ganger trenger du å trekke ut de unike verdiene fra en enkelt kolonne, vil de ovennevnte metoder ikke hjelpe deg, her, jeg kan anbefale et nyttig verktøy-Kutools for Excel, med sin Select Duplicate & Unike Cells verktøyet kan du raskt trekke ut de unike verdiene
Kutools for Excel. Med mer enn 120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 60 dager. Få det nå. Etter å ha installert Kutools for Excel, kan du gjøre som følger :( Gratis Last ned Kutools for Excel nå)
en. Velg dataområdet som du vil trekke ut de unike verdiene.
2. Klikk deretter Kutools > Velg > Velg Duplicate & Unike Cells, se skjermbilde:
tre. I Velg Duplicate & Unike Cells dialogboksen velger unike verdier eller alle unike (Inkludert en st duplikater) som ditt behov, se skjermbilde:
4. Klikk deretter på OK-knappen, og du vil få følgende resultater:
Velg bare unike verdier Velg alle unike verdier med første duplikater 5. Når du har valgt de unike verdiene, du trenger bare å holde Ctrl + C for å kopiere de valgte verdier, og deretter lime dem til cellene der du ønsker å sette resultatet. Alle unike verdier har blitt trukket ut som følgende skjermbilde vises:
å vite mer om denne Select Duplicate & Unike Cells har.
Gratis Last ned Kutools for Excel Nå