Ehdollinen muotoilu - Korosta kaksoiskappaleet
Jos haluat korostaa kaikki alueen päällekkäiset arvot, käytä Excelin ehdollista muotoilutoimintoa. Seuraa vain näitä ohjeita:
1. Valitse alue, joka sisältää päällekkäiset arvot. Huomautus: jos työskentelet tietotaulukon kanssa, valitse vain yksilölliset tunnukset.
2. Avaa Ehdollinen muotoiluvalikko ja valitse Korosta kaksoiskappaleet (Alt> H> L> H> D)
Etsi ja korosta kaikki alueen kaksoiskappaleet VBA: n avulla
Päivitys: Tarkoituksestasi riippuen alla oleva koodi ei ehkä ole enää tarpeen. Kuten edellä keskusteltiin, sama voidaan tehdä käyttämällä Excelin ehdollista muotoilutoimintoa. Tämä toiminto saattaa kuitenkin olla hyödyllinen, jos haluat löytää päällekkäisiä arvoja työskennellessäsi VBA: ssa.
Seuraava aliohjelma korostaa kaikki alueen päällekkäiset arvot keltaisella värillä. Ei ole väliä onko arvot tekstiä vai numeroita. Se laskee kaksoiskappaleet Excelin COUNTIF -toiminnolla ja asettaa sitten värin keltaiseksi:
| 12345678910 | Sub Highlight_Duplicates (Arvot alueena)Himmeä soluJokaiselle arvojen solulleJos WorksheetFunction.CountIf (Arvot, Cell.Value)> 1 SittenCell.Interior.ColorIndex = 6Loppu JosSeuraava soluEnd Sub |
ja sitten jos painamme painiketta, näemme kaikki kaksoiskappaleet:
Voit ladata .XLS -tiedoston tämän opetusohjelman avulla napsauttamalla tätä
