Selles artiklis oleme loonud makro, mis toob esile topeltväärtused.
Toorandmed koosnevad erinevatest autonimedest. Soovime esile tõsta duplikaatkirjeid.
Makro käivitamiseks ja topeltkirjete esiletõstmiseks vajutage nuppu „Tõstke duplikaat esile”.
Loogiline seletus
Topeltkirjete esiletõstmiseks oleme loonud makro „Check_Dups”. Neid tõstetakse esile punase värviga. Makros kontrollime konkreetse kirje arvu. Kui see on suurem kui 1, tõstetakse andmed esile.
Palun järgige koodi allpool
Valik Explicit Sub Check_Dups () 'Muutujate deklareerimine Dim Dimmer Variant Dim Dim Source kui vahemik' Allikavahemiku lähtestamine Set Source = Range ("A9: A24") 'Eelmine vormindus eemaldatakse allikast Source.Interior.Color = RGB (221, 235, 247. värv Lahtrid.Sisustus.Värv = RGB (255, 0, 0) Lõpp Kui järgmine lõpp Alam
Kui teile see blogi meeldis, jagage seda oma sõpradega Facebookis. Lisaks saate meid jälgida Twitteris ja Facebookis.
Tahaksime sinust kuulda, andke meile teada, kuidas saaksime oma tööd paremaks muuta ja teie jaoks paremaks muuta. Kirjuta meile meilisaidile