Ndër mjetet standarde të Microsoft Excel, ka shumë mënyra të ndryshme për të theksuar dublikatat me ngjyra. Mënyra më e lehtë dhe më e shpejtë është me formatimin e kushtëzuar. Për ta bërë këtë, thjesht zgjidhni një gamë qelizash dhe zgjidhni në skedën Faqja kryesore — Formatimi i kushtëzuar — Rregullat e përzgjedhjes së qelizave — Vlerat e dyfishta (Shtëpia - Formatimi i kushtëzuar - Theksoni rregullat e qelizave - Vlerat e dyfishta):
Megjithatë, në këtë rast, ngjyra e mbushjes së të gjitha qelizave do të jetë e njëjtë, dmth thjesht sinjalizon se elementi ka dublikatë diku tjetër në intervalin, por nuk bën asgjë për t'i gjetur ato. Ju mund ta rregulloni situatën me një makro të vogël që do të mbushë çdo çift (ose më shumë) dublikatash të përsëritura me ngjyrën e vet:
Shumë më e qartë, apo jo? Natyrisht, me një numër të madh qelizash përsëritëse, do të jetë e vështirë të bëhet dallimi midis hijeve, por me një numër relativisht të vogël dublikatash, kjo metodë do të funksionojë në mënyrë të përsosur.
Për të përdorur këtë makro, shtypni shkurtoren e tastierës Alt + F11 ose butoni Visual Basic tab Zhvillues, futni një modul të ri bosh nëpërmjet menysë Insert – Moduli dhe kopjoni kodin e kësaj makro atje:
Sub DuplicatesColoring() Dim Dupes() 'Deklaroni një grup për të ruajtur dublikatat ReDim Dupes(1 në Selection.Cells.Count, 1 në 2) Selection.Interior.ColorIndex = -4142 'Hiqni mbushjen nëse i = 3 Për çdo qelizë në Zgjedhja If WorksheetFunction.CountIf(Selection, cell.Value) > 1 Pastaj Për k = LBound(Dupes) To UBound(Dupes) 'nëse qeliza është tashmë në grupin e dublikatave, plotësoni If Dupes(k, 1) = qelizë Pastaj qeliza.E brendshme. ColorIndex = Dupes(k, 2) Tjetra k 'nëse qeliza përmban një dublikatë, por jo ende në grup, shtoni atë në grup dhe plotësoni atë Nëse cell.Interior.ColorIndex = -4142 Pastaj qeliza.Interior.ColorIndex = i Dupes(i, 1 ) = qelizë. Vlera Dupes(i, 2) = ii = i + 1 Fundi If Fund Nëse qeliza tjetër Fundi Sub
Tani mund të zgjidhni çdo gamë me të dhëna në fletë dhe të ekzekutoni makronë tonë duke përdorur shkurtoren e tastierës Alt + F8 ose përmes butonit macros (Makro) tab zhvillues (Zhvilluesi).
- Theksoni dublikatat me ngjyra
- Çfarë janë makro, ku të futni kodin makro në Visual Basic, si t'i ekzekutoni ato
- Si të numëroni numrin e vlerave unike në një gamë të caktuar qelizash