Tässä artikkelissa olemme luoneet makron korostamaan päällekkäisiä arvoja.
Raakatiedot koostuvat eri autojen nimistä. Haluamme korostaa päällekkäisiä merkintöjä.
Suorita makro ja korosta päällekkäiset merkinnät painamalla Korosta päällekkäiset -painiketta.
Looginen selitys
Olemme luoneet Check_Dups -makron korostamaan päällekkäisiä merkintöjä. Ne korostetaan punaisella värillä. Makrossa tarkistamme tietyn merkinnän määrän. Jos se on suurempi kuin 1, tiedot korostetaan.
Seuraa koodia alla
Vaihtoehto Explicit Sub Check_Dups () 'Muuttujien ilmoittaminen Dim -solu vaihtoehtona Dim -lähde alueena' Lähdealueen alustaminen Aseta lähde = alue ("A9: A24") 'Kaikki aiemmat muotoilut poistetaan lähteestä Source.Interior.Color = RGB (221, 235, 247. väri Cell.Interior.Color = RGB (255, 0, 0) End If Next End Sub
Jos pidit tästä blogista, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse