Standart Microsoft Excel vositalari orasida dublikatlarni rang bilan ajratib ko'rsatishning turli usullari mavjud. Eng oson va tezkor usul shartli formatlashdir. Buning uchun katakchalar qatorini tanlang va yorliqda tanlang Bosh sahifa — Shartli formatlash — Hujayra tanlash qoidalari — Qayta nusxadagi qiymatlar (Uy - Shartli formatlash - Yacheykalarni ajratib ko'rsatish qoidalari - takroriy qiymatlar):
Biroq, bu holda, barcha kataklarning to'ldirish rangi bir xil bo'ladi, ya'ni u elementning diapazonning boshqa joyida dublikatlari borligini bildiradi, lekin ularni topishga yordam bermaydi. Vaziyatni har bir takroriy dublikat juftligini (yoki undan ko'pini) o'z rangi bilan to'ldiradigan kichik makros bilan tuzatishingiz mumkin:
Shunchalik aniqroq, to'g'rimi? Albatta, ko'p sonli takrorlanuvchi hujayralar bilan soyalarni ajratish qiyin bo'ladi, ammo nisbatan kam sonli dublikatlar bilan bu usul mukammal ishlaydi.
Ushbu makrosdan foydalanish uchun klaviatura yorlig'ini bosing Alt + F11 yoki tugma Visual Basic tab Developer, menyu orqali yangi bo'sh modulni joylashtiring Qo'shish - modul va ushbu makrosning kodini u yerga nusxalash:
Sub DuplicatesColoring() Dim Dupes() 'Dublikatlarni saqlash uchun massivni e'lon qilish Tanlash WorksheetFunction.CountIf(Selection, cell.Value) > 1 bo'lsa, k = LBound(Dupes) To UBound(Dupes) 'agar hujayra allaqachon dublikatlar qatorida bo'lsa, If Dupes(k, 1) = katakchani to'ldiring. Keyin hujayra.Interyer. ColorIndex = Dupes(k, 2) Keyingi k 'agar hujayrada dublikat bo'lsa, lekin hali massivda bo'lmasa, uni massivga qo'shing va to'ldiring Agar hujayra.Interior.ColorIndex = -4142 Keyin cell.Interior.ColorIndex = i Dupes(i, 3 ) = xujayra.Qiymat Dupes(i, 1) = ii = i + 1 Agar tugasa, keyingi katak oxiri pastki bo'lsa
Endi siz varaqdagi ma'lumotlar bilan istalgan diapazonni tanlashingiz va klaviatura yorlig'i yordamida makromizni ishga tushirishingiz mumkin Alt + F8 yoki tugma orqali macros (makroslar) tab dasturchi (ishlab chiquvchi).
- Dublikatlarni rang bilan ajratib ko'rsatish
- Makroslar nima, Visual Basic dasturida makro kodni qayerga kiritish, ularni qanday ishga tushirish kerak
- Berilgan hujayralar oralig'idagi noyob qiymatlar sonini qanday hisoblash mumkin