Sut i greu rhestr unigryw yn gyflym (tynnu dyblygu) o golofn benodol yn Excel?
Tybiwch fod gennych chi restr o enwau gyda dyblygu, a nawr eich bod chi eisiau creu rhestr newydd o enwau unigryw o'r golofn benodol hon, sut allech chi ei datrys yn Excel? Nawr mae'r tiwtorial hwn yn cyflwyno rhai triciau a all eich helpu i greu rhestr unigryw yn gyflym o golofn rhoi.
Creu rhestr unigryw o'r golofn gyda Advanced Filter
Creu rhestr unigryw o'r golofn gyda VBA
Yn gyflym creu rhestr unigryw o golofn gyda Kutools for Excel
Creu rhestr unigryw o'r golofn gyda Advanced Filter
Yn Excel, gallwch gymhwyso'r swyddogaeth Hidlo Uwch i hidlo'r data unigryw o restr.
1. Cliciwch Dyddiad > Uwch. Gweler y screenshot:
2. Yn y Hidlo Uwch deialog, gwnewch fel isod:
(1) Gwiriwch Copïwch i leoliad arall opsiwn a Cofnodion unigryw yn unig opsiwn;
(2) Dewiswch y golofn ddyblygu i Ystod rhestr blwch testun, a dewis cell i roi'r rhestr unigryw iddi Copi i blwch testun.
3. Cliciwch OK. Nawr mae'r rhestr unigryw wedi'i chreu. Gweler y screenshot:
Creu rhestr unigryw o'r golofn gyda VBA
Yn Excel, gallwch hefyd ddefnyddio cod VBA i greu rhestr unigryw o golofn benodol.
1. Gwasgwch Alt + F11 i ddangos Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, a chlicio Mewnosod > Modiwlau, yna copïwch a gludwch islaw VBA i ffenestr y Modiwl newydd.
VBA: Creu rhestr unigryw o'r golofn benodol.
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. Gwasgwch F5 allweddol neu Run botwm i alluogi'r cod VBA, ac yn y dialog popping, dewiswch y rhestr gyda dyblygu a chlicio OK, yna dewiswch gell i roi'r canlyniad. Gweler sgrinluniau:
3. Nawr, mae rhestr gydag enwau unigryw wedi'i chreu.
Yn gyflym creu rhestr unigryw o golofn gyda Kutools for Excel
A dweud y gwir, gyda Dewiswch Gelloedd Dyblyg ac Unigryw nodwedd o Kutools for Excel, gallwch hefyd greu rhestr unigryw yn gyflym o golofn benodol.
Kutools for Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. |
Ar ôl gosod am ddim Kutools for Excel, gallwch ddefnyddio Dewiswch Gelloedd Dyblyg ac Unigryw.
1. Dewiswch y rhestr (Mae'n ddewisol dewis pennawd y golofn) rydych chi am greu rhestr unigryw yn seiliedig arni, a chlicio Kutools > dewiswch > Dewiswch Gelloedd Dyblyg ac Unigryw. Gweler y screenshot:
2. Yn y dialog popping, gwiriwch Pob un unigryw (Gan gynnwys dyblygu 1af) opsiwn o dan Rheol adran. Gweler y screenshot:
3. Cliciwch Ok, ac yna mae deialog yn galw allan i'ch atgoffa nifer y celloedd a ddewiswyd. Gweler y screenshot:
4. Cliciwch OK, yna pwyswch Ctrl + C i gopïo'r celloedd a ddewiswyd a dewis cell a phwyso Ctrl + V allweddi i roi'r canlyniad.
Tip: Os ydych chi am ddewis gwerthoedd mewn achos sy'n sensitif, gallwch wirio Achos sensitif opsiwn yn y Dewiswch Gelloedd Dyblyg ac Unigryw deialog.
Gyda Dewiswch Gelloedd Dyblyg ac Unigryw nodwedd, dim ond dyblygu gan gynnwys un cyntaf y gallwch eu dewis, dewis dyblygu yn unig ac eithrio'r un cyntaf, a dewis yr holl werthoedd unigryw ac eithrio'r un cyntaf. Ei gael nawr a hawdd eich gwaith Excel.
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools for Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed o'r blaen. Kutools for Excel Yn cynnig dros 300 o nodweddion uwch i hybu cynhyrchiant ac arbed amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Office Tab Yn dod â rhyngwyneb Tabbed i Office, ac yn 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!
