Kako odstraniti dvojnike v Excelu z uporabo VBA (3 hitre metode)

Hugh West

01-10-2023 Osnove programa Excel
  • Deliti To
Hugh West

Ena najpomembnejših dejavnosti v programu Excel je odstranite podvojitve Danes bom pokazal, kako odstraniti podvojitve v Excelu samo z uporabo VBA.

Prenesi delovni zvezek za prakso

Odstranjevanje dvojnikov v Excelu z VBA.xlsm

3 hitre metode za uporabo VBA v Excelu za odstranjevanje dvojnikov

Tu imamo nabor podatkov z Imena, ID-ji, Oznake, in . Razredi pri preverjanju znanja nekaterih učencev šole z imenom Sunflower Kindergarten.

Če boste pozorno pogledali, boste ugotovili, da so bila nekatera imena pomotoma ponovljena.

Danes je naš cilj odstraniti podvojene vrednosti z uporabo programa Excel VBA.

1. Z uporabo VBA odstranite dvojnike iz fiksnega območja celic

Najprej bomo poskušali odstranite podvojena imena z uporabo fiksnega območja celic v VBA koda.

V tem primeru je naš nabor podatkov območje B3:E15 v delovnem zvezku (Vključno z Naslovi stolpcev ).

Ta fiksni obseg celic bomo uporabili v tej kodi.

Korak 1:

➤ Odprite novo VBA in vstavite nov modul (Kliknite tukaj za ogled kako odpreti in vstaviti nov modul VBA v Excelu).

➤ To kodo vstavite v modul:

Koda: 

 Sub Remove_Duplicates() Range("A3:E14").RemoveDuplicates Columns:=1, Header:=xlYes End Sub

➤ Ustvari makro, ki se imenuje Odstrani_duplikate . A3:E14 je obseg mojega nabora podatkov in želim odstranite podvojene vrstice. na podlagi Stolpec 1 . Uporabljajte svoj.

Korak 2:

➤ Vrnite se na delovni list in zaženite ta Makro (Kliknite tukaj, če želite videti, kako zagnati Makro).

➤ Odstranil bo vrstice z dvojniki v stolpcu 1 ( Ime študenta).

Preberite več: Kako izbrisati podvojene datoteke v Excelu, vendar ohraniti eno (7 metod)

2. Vstavite kode VBA za odstranjevanje dvojnikov iz izbranega območja celic

Zdaj bomo poskusili sestaviti makro, ki lahko odstrani podvojitve iz poljubnega izbranega območja celic v delovnem listu.

Korak 1:

➤ Odprite novo VBA ponovno vstavite okno in vstavite še en nov modul.

➤ To kodo vstavite v modul:

Koda: 

 Sub Remove_Duplicates() Dim Rng As Range Set Rng = Izbor Rng.RemoveDuplicates Columns:=1, Header:=xlYes End Sub

➤ Ustvari makro, ki se imenuje Odstrani_duplikate Želim odstraniti podvojene vrstice na podlagi Stolpec 1 . Uporabljajte svoj.

Korak 2:

➤ Vrnite se k delovnemu listu.

➤ Izberite svoj nabor podatkov in zaženite ta makro.

➤ Izvedlo se bo enako kot zgoraj. Odstranite vrstice s podvojenimi vrsticami v stolpcu 1 ( Ime študenta).

Preberite več: Kako odstraniti podvojene vrstice v programu Excel (3 načini)

Podobna branja

  • Kako odstraniti dvojnike iz stolpca v Excelu (3 metode)
  • Excel VBA: Odstranjevanje dvojnikov iz polja (2 primera)
  • Kako odstraniti podvojene datoteke in ohraniti prvo vrednost v Excelu (5 metod)
  • Odstranjevanje podvojenih vrstic, razen prvega pojava v Excelu (7 načinov)
  • Kako odstraniti obe podvojitvi v Excelu (5 preprostih načinov)

3. Vgradnja makra VBA za odstranjevanje dvojnikov iz več stolpcev

Do zdaj smo odstranili vrstice, ki so se podvajale v stolpcu 1 ( Ime in priimek učenca ).

Vendar sta lahko imeni dveh učencev enaki, kar ne pomeni vedno, da je bilo ime napačno dodano, če sta dve imeni enaki.

Če pa so ID-ji dveh študentov enaki, potem gre za istega študenta. Potem je treba vrstico odstraniti.

Tokrat bomo razvili makro, ki bo odstranil vrstico, če sta ime in ID dveh vrstic enaka.

Korak 1:

➤ Odprite novo VBA ponovno vstavite okno in vstavite še en nov modul.

➤ To kodo vstavite v modul:

Koda: 

 Sub Remove_Duplicates() Dim Rng As Range Set Rng = Izbor Rng.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes End Sub

➤ Ustvari makro, ki se imenuje Odstrani_duplikate Želim odstraniti podvojene vrstice na podlagi Stolpca 1 in 2 (ime in ID) . Uporabljajte svoj.

Korak 2:

➤ Vrnite se k delovnemu listu.

➤ Izberite svoj nabor podatkov in zaženite ta makro.

➤ Tokrat bo odstranil vrstice le, če sta ime in ID študenta enaka.

Opomba: V tem primeru ni odstranil Jennifer Marlo, ker sta identifikacijski številki obeh študentov različni, torej sta to dva različna študenta.

Preberite več: Excel VBA: Odstranjevanje podvojenih datotek ob primerjavi več stolpcev (3 primeri)

Zaključek

S temi metodami lahko v Excelu z uporabo VBA odstranite podvojene podatke iz niza podatkov. Imate težave? Vprašajte nas.

Prejšnja objava Excelova funkcija IFERROR za vračanje praznega namesto 0
Naslednja objava Kako narediti primerjalni diagram v Excelu (4 učinkoviti načini)

Hugh West je zelo izkušen trener Excela in analitik z več kot 10-letnimi izkušnjami v industriji. Po izobrazbi je diplomirani računovodstvo in finance ter magisterij poslovne administracije. Hugh ima strast do poučevanja in je razvil edinstven pristop k poučevanju, ki ga je enostavno slediti in razumeti. Njegovo strokovno znanje o Excelu je pomagalo na tisoče študentom in strokovnjakom po vsem svetu, da so izboljšali svoje sposobnosti in se izkazali v karieri. Prek svojega bloga Hugh deli svoje znanje s svetom, ponuja brezplačne vadnice za Excel in spletno usposabljanje, ki posameznikom in podjetjem pomaga doseči njihov polni potencial.