Tabl cynnwys
Un o'r gweithgareddau pwysicaf yn Excel yw tynnu copïau dyblyg o set ddata benodol. Heddiw, byddaf yn dangos sut i gael gwared ar ddyblygiadau yn Excel gan ddefnyddio VBA yn unig.
Lawrlwytho Llyfr Gwaith Ymarfer
Dileu Dyblygiadau yn Excel gyda VBA.xlsm
3 Dull Cyflym o Ddefnyddio VBA yn Excel i Dynnu Dyblygiadau
Yma mae gennym set ddata gyda'r Enwau, IDs, Marciau, a Graddau yn arholiad rhai myfyrwyr ysgol o'r enw Sunflower Kindergarten.
Os edrychwch yn ofalus , fe welwch fod rhai enwau wedi'u hailadrodd ar gam.
Heddiw ein nod yw dileu'r gwerthoedd dyblyg gan ddefnyddio Excel VBA.
1. Defnyddiwch VBA i Dynnu Dyblygiadau o Ystod Celloedd Sefydlog
Yn gyntaf oll, byddwn yn ceisio tynnu'r enwau dyblyg gan ddefnyddio ystod celloedd sefydlog yn y VBA cod.
Yma, ein set ddata yw'r ystod B3:E15 yn y llyfr gwaith (Gan gynnwys y Penawdau Colofn ).
Byddwn yn defnyddio yr amrediad celloedd sefydlog hwn yn y cod yma.
Cam 1:
➤ Agorwch ffenestr VBA newydd a mewnosod modiwl newydd (Cliciwch yma i weld sut i agor a mewnosod modiwl VBA newydd yn Excel).
➤ Mewnosodwch y cod hwn yn y modiwl:
Cod:
6586
➤ Mae'n cynhyrchu Macro o'r enw Remove_Duplicates . A3:E14 yw ystod fy set ddata, ac rwyf am tynnu'r rhesi dyblyg yn seiliedig ar Colofn 1 . Tidefnyddiwch eich un chi.
Cam 2:
➤ Dewch yn ôl at eich taflen waith a rhedeg y Macro hwn (Cliciwch yma i weld sut i redeg Macro).
➤ Bydd yn dileu'r rhesi gyda dyblygiadau yng ngholofn 1 ( Enw Myfyriwr).
Darllen Mwy: Sut i Ddileu Dyblygiadau yn Excel ond Cadw Un (7 Dull)
2. Mewnosod Codau VBA i Dynnu Dyblygiadau o'r Ystod Celloedd Dethol
Nawr byddwn yn ceisio adeiladu macro a all dynnu copïau dyblyg o unrhyw ystod celloedd a ddewiswyd yn y daflen waith.
Cam 1:
➤ Agorwch ffenestr VBA newydd eto a mewnosod modiwl newydd arall.
➤ Mewnosodwch y cod hwn yn y modiwl:
Cod:
8725
➤ Mae'n cynhyrchu Macro o'r enw Remove_Duplicates . Rwyf am gael gwared ar y rhesi dyblyg yn seiliedig ar Colofn 1 . Rydych chi'n defnyddio'ch un chi.
Cam 2:
➤ Dewch yn ôl at eich taflen waith.
➤ Dewiswch eich set ddata a rhedeg y macro hwn.
➤ Bydd yn gweithredu'r un peth ag a wnaed uchod. Tynnwch y rhesi gyda'r copïau dyblyg yng ngholofn 1 ( Enw'r Myfyriwr).
Enw Myfyriwr).Darllen Mwy: Sut i Dynnu Dyblyg Rhesi yn Excel (3 Ffordd)
Darlleniadau Tebyg
- Sut i Dynnu Dyblygiadau o Golofn yn Excel (3 Dull) <2
- Excel VBA: Dileu Dyblygiadau o Arae (2 Enghraifft)
- Sut i Dynnu Dyblygiadau a Chadw'r Gwerth Cyntaf yn Excel (5 Dull)
- DileuRhesi Dyblyg Ac eithrio Digwyddiad 1af yn Excel (7 Ffordd)
- Sut i gael gwared ar y ddau gopi dyblyg yn Excel (5 Ffordd Hawdd)
>3. Mewnosod Macro VBA i Dynnu Dyblygiadau o Golofnau Lluosog
Hyd yn hyn rydym wedi dileu'r rhesi sydd â dyblygu yng Ngholofn 1 ( Enw Myfyriwr ).
Ond mewn gwirionedd, gall enwau dau fyfyriwr fod yr un peth, nid yw bob amser yn golygu ei fod wedi'i ychwanegu ar gam os yw dau enw yr un peth.
Ond os yw ID dau fyfyriwr yr un peth hefyd, yna yr un myfyriwr ydynt. Yna bydd y rhes yn cael ei thynnu.
Y tro hwn byddwn yn datblygu Macro a fydd yn tynnu'r rhes os yw enw ac ID dwy res yr un peth.
Cam 1 :
➤ Agorwch ffenestr VBA newydd eto a mewnosod modiwl newydd arall.
➤ Mewnosodwch y cod hwn yn y modiwl:
1>Cod:
8507
➤ Mae'n cynhyrchu Macro o'r enw Remove_Duplicates . Rwyf am gael gwared ar y rhesi dyblyg yn seiliedig ar Colofn 1 a 2 (Enw ac ID) . Rydych chi'n defnyddio'ch un chi.
Cam 2:
➤ Dewch yn ôl at eich taflen waith.
➤ Dewiswch eich set ddata a rhedeg y macro hwn.
➤ Y tro hwn bydd yn dileu'r rhesi dim ond os yw'r enw a'r ID myfyriwr yr un peth.
Darllen Mwy: Excel VBA: Dileu Dyblygiadau sy'n Cymharu Colofnau Lluosog (3 Enghreifftiol)
Casgliad
Gan ddefnyddio'r dulliau hyn, gallwch dynnu copïau dyblyg o a set ddata yn Excel gan ddefnyddio VBA. Oes gennych chi unrhyw broblemau? Mae croeso i chi ofyn i ni.
