Pogojno oblikovanje - označite dvojnike
Za označevanje vseh podvojenih vrednosti v obsegu boste uporabili Excelovo funkcijo pogojnega oblikovanja. Preprosto sledite tem korakom:
1. Izberite obseg, ki vsebuje podvojene vrednosti. Opomba: če delate s tabelo podatkov, izberite samo edinstvene ID -je.
2. Odprite Meni pogojnega oblikovanja in izberite Označite dvojnike (Alt> H> L> H> D)
Poiščite in označite vse podvojene v obsegu z VBA
Posodobitev: Glede na vaš namen spodnja koda morda ne bo več potrebna. Kot je razloženo zgoraj, je enako mogoče doseči z Excelovo funkcijo pogojnega oblikovanja. Vendar vam bo ta funkcija morda še vedno koristna za iskanje podvojenih vrednosti pri delu v VBA.
Naslednja podprogram bo označila vse podvojene vrednosti v razponu z rumeno barvo. Ni pomembno, ali so vrednosti besedilo ali številke. Uporablja Excelovo funkcijo COUNTIF za štetje dvojnikov in nato barvo nastavi na rumeno:
12345678910 | Sub Highlight_Duplicates (Vrednosti v razponu)Zatemnjena celicaZa vsako celico v vrednostiČe WorksheetFunction.CountIf (Values, Cell.Value)> 1 PotemCell.Interior.ColorIndex = 6Konec ČeNaslednja celicaEnd Sub |
in potem, če pritisnemo gumb, vidimo vse dvojnike:
Če želite prenesti datoteko .XLS s to vadnico, kliknite tukaj