Sut i dynnu rhestr o werthoedd unigryw yn ddeinamig o ystod colofn yn Excel?
Ar gyfer amrediad colofn y mae'r gwerthoedd yn newid yn rheolaidd, ac mae angen i chi bob amser gael yr holl werthoedd unigryw o'r ystod ni waeth sut y newidiodd. Sut i wneud rhestr ddeinamig o werthoedd unigryw? Bydd yr erthygl hon yn dangos i chi sut i ddelio ag ef.
Tynnwch restr o werthoedd unigryw yn ddeinamig o ystod colofn gyda fformiwla
Tynnwch restr o werthoedd unigryw yn ddeinamig o ystod colofn gyda chod VBA
Tynnwch restr o werthoedd unigryw yn ddeinamig o ystod colofn gyda fformiwla
Fel y dangosir isod y llun, mae angen i chi dynnu rhestr o werthoedd unigryw yn ddeinamig o ystod B2: B9. Rhowch gynnig ar y fformiwla arae ganlynol.
1. Dewiswch gell wag fel D2, rhowch y fformiwla isod i mewn iddi a gwasgwch y Ctrl + Symud + Rhowch allweddi ar yr un pryd. (B2: B9 yw'r data colofn rydych chi am echdynnu'r gwerthoedd unigryw, D1 yw'r gell uchod lle mae'ch fformiwla wedi'i lleoli)
=IFERROR(INDEX($B$2:$B$9, MATCH(0,COUNTIF($D$1:D1, $B$2:$B$9), 0)),"")
2. Daliwch i ddewis cell D2, yna llusgwch y Llenwch Trin i lawr i gael yr holl werthoedd unigryw o'r ystod benodol.
Nawr mae'r holl werthoedd unigryw yn ystod colofn B2: B9 wedi'u tynnu. Pan newidiodd gwerthoedd yn yr ystod hon, bydd y rhestr werth unigryw yn cael ei newid yn ddeinamig ar unwaith.
Dewis ac amlygu'r holl werthoedd unigryw yn hawdd mewn ystod o ragori:
Mae practis meddygol Dewiswch Gelloedd Dyblyg ac Unigryw cyfleustodau Kutools ar gyfer Excel yn gallu'ch helpu chi i ddewis ac amlygu'r holl werthoedd unigryw yn hawdd (cynnwys y dyblygu cyntaf) neu'r gwerthoedd unigryw sy'n ymddangos unwaith yn unig, yn ogystal â gwerthoedd dyblyg ag sydd eu hangen arnoch chi fel y dangosir isod.
Dadlwythwch Kutools ar gyfer Excel nawr! (30- llwybr diwrnod am ddim)
Tynnwch restr o werthoedd unigryw yn ddeinamig o ystod colofn gyda chod VBA
Gallwch hefyd dynnu rhestr o werthoedd unigryw yn ddeinamig o ystod colofn gyda'r cod VBA canlynol.
1. Gwasgwch Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Yna copïwch a gludwch y cod VBA isod i'r Modiwlau ffenestr.
Cod VBA: Tynnwch restr o werthoedd unigryw o ystod
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
Nodyn: Yn y cod, D2 yw'r gell y byddwch chi'n dod o hyd i'r rhestr werth unigryw. Gallwch ei newid yn ôl yr angen.
3. Ewch yn ôl i'r daflen waith, cliciwch Mewnosod > Siapiau > Petryal. Gweler y screenshot:
4. Tynnwch betryal yn eich taflen waith, yna nodwch rai geiriau y mae angen i chi eu harddangos arno. Yna cliciwch ar y dde a dewis Neilltuo Macro o'r ddewislen clicio ar y dde. Yn y Neilltuo Macro blwch deialog, dewiswch y CreuUniqueList yn y Enw macro blwch, ac yna cliciwch ar y OK botwm. Gweler y screenshot:
5. Nawr cliciwch ar y botwm petryal, a Kutools ar gyfer Excel blwch deialog yn ymddangos, dewiswch yr ystod sy'n cynnwys gwerthoedd unigryw y mae angen i chi eu tynnu, ac yna cliciwch ar y OK botwm.
O hyn ymlaen, gallwch ailadrodd y cam 5 uchod i ddiweddaru'r rhestr werth unigryw yn awtomatig.
Erthyglau perthnasol:
- Sut i greu calendr misol deinamig yn Excel?
- Sut i fewnosod delwedd neu lun yn ddeinamig mewn cell yn seiliedig ar werth celloedd yn Excel?
- Sut i greu hyperddolen ddeinamig i ddalen arall yn Excel?
Yr Offer Cynhyrchedd Swyddfa Gorau
Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%
- Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
- Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
- Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
- Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
- Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
- Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
- Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
- Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
- Mwy na 300 o nodweddion pwerus. Yn cefnogi Office / Excel 2007-2021 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!



































