Conas liosta luachanna uathúla a bhaint go dinimiciúil as raon colún in Excel?

Maidir le raon colún a mbíonn na luachanna ag athrú go rialta, agus ní mór duit na luachanna uathúla uile a fháil ón raon is cuma cén chaoi ar athraigh sé. Conas liosta dinimiciúil de luachanna uathúla a dhéanamh? Taispeánfaidh an t-alt seo duit conas déileáil leis.

Bain go dinimiciúil liosta de luachanna uathúla ó raon colún le foirmle
Bain go dinimiciúil liosta de luachanna uathúla ó raon colún le cód VBA

Bain go dinimiciúil liosta de luachanna uathúla ó raon colún le foirmle

Mar a thaispeántar thíos an scáileán, ní mór duit liosta luachanna uathúla a bhaint go dinimiciúil ó raon B2: B9. Bain triail as an bhfoirmle eagar seo a leanas le do thoil.

1. Roghnaigh cill bhán mar D2, cuir isteach an fhoirmle thíos agus brúigh an Ctrl + Shift + Iontráil eochracha ag an am céanna. (B2: Is é B9 na sonraí colúin ar mhaith leat na luachanna uathúla a bhaint astu, is é D1 an chill thuas ina bhfuil do fhoirmle suite)

=IFERROR(INDEX($B$2:$B$9, MATCH(0,COUNTIF($D$1:D1, $B$2:$B$9), 0)),"")

2. Coinnigh ag roghnú cill D2, ansin tarraing an Láimhseáil Líon isteach chun na luachanna uathúla uile a fháil ón raon sonraithe.

Anois baintear na luachanna uathúla uile i raon colún B2: B9. Nuair a athrófar luachanna sa raon seo, athrófar an liosta luachanna uathúil go dinimiciúil láithreach.

Bain go dinimiciúil liosta de luachanna uathúla ó raon colún le cód VBA

Is féidir leat freisin liosta luachanna uathúla a bhaint go dinimiciúil ó raon colúin leis an gcód VBA seo a leanas.

1. Brúigh Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil. Ansin cóipeáil agus greamaigh an cód VBA thíos sa Modúil fhuinneog.

Cód VBA: Sliocht liosta de luachanna uathúla ó raon

Sub CreateUniqueList()
Dim xRng As Range
Dim xLastRow As Long
Dim xLastRow2 As Long
Dim I As Integer
On Error Resume Next
Set xRng = Application.InputBox("Please select range:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
xRng.Copy Range("D2")
xLastRow = xRng.Rows.Count + 1
ActiveSheet.Range("D2:D" & xLastRow).RemoveDuplicates Columns:=1, Header:=xlNo
xLastRow2 = Cells(Rows.Count, "B").End(xlUp).Row
For I = 1 To xLastRow2
  If ActiveSheet.Range("D2:D" & xLastRow2).Cells(I).Value = "" Then
     ActiveSheet.Range("D2:D" & xLastRow2).Cells(I).Delete
  End If
Next
End Sub

nótaí: Sa chód, is é D2 an chill a bhfaighidh tú an liosta luacha uathúil. Is féidir leat é a athrú de réir mar is gá duit.

3. Téigh ar ais go dtí an bhileog oibre, cliceáil Ionsáigh > cruthanna > dronuilleog. Féach an pictiúr:

4. Tarraing dronuilleog i do bhileog oibre, ansin cuir isteach roinnt focal a chaithfidh tú a thaispeáint air. Ansin cliceáil ar dheis air agus roghnaigh Macra a shannadh ón roghchlár cliceáil ar dheis. Sa Macra a shannadh bosca dialóige, roghnaigh an CreateUniqueList sa Macra-ainm bosca, agus ansin cliceáil ar an OK cnaipe. Féach an pictiúr:

5. Anois cliceáil ar an gcnaipe dronuilleog, a Kutools le haghaidh Excel bosca dialóige aníos, roghnaigh le do thoil go bhfuil luachanna uathúla ag an raon a chaithfidh tú a bhaint, agus ansin cliceáil ar an OK cnaipe.

As seo amach, is féidir leat an chéim 5 thuas a athdhéanamh chun an liosta luacha uathúil a nuashonrú go huathoibríoch.

Earraí gaolmhara:

• Conas féilire míosúil dinimiciúil a chruthú in Excel?
• Conas íomhá nó pictiúr a chur isteach go dinimiciúil i gcill bunaithe ar luach cille in Excel?
• Conas hipearnasc dinimiciúil a chruthú le bileog eile in Excel?

---

Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

• Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
• Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
• Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
• Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
• Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
• Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
• Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
• Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
• Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.

Leigh Nios mo... Íoslódáil saor in aisce ... Ceannach ... 

---

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

• Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
• Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
• Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!

Leigh Nios mo... Íoslódáil saor in aisce ... Ceannach ...