Стандартты Microsoft Excel құралдарының ішінде түспен көшірмелерді ерекшелеудің көптеген әртүрлі тәсілдері бар. Ең оңай және жылдам әдіс - шартты пішімдеу. Мұны істеу үшін ұяшықтар ауқымын таңдап, қойындыда таңдаңыз Басты — Шартты пішімдеу — Ұяшықтарды таңдау ережелері — Қайталанатын мәндер (Басты бет — Шартты пішімдеу — Ұяшықтарды бөлектеу ережелері — Көшірме мәндер):
Дегенмен, бұл жағдайда барлық ұяшықтардың бояу түсі бірдей болады, яғни бұл жай ғана элементтің диапазонның басқа жерінде көшірмелері бар екенін білдіреді, бірақ оларды табуға көмектесетін ештеңе жасамайды. Жағдайды қайталанатын көшірмелердің әрбір жұбын (немесе одан да көп) өз түсімен толтыратын шағын макроспен түзете аласыз:
Соншалықты анық, солай ма? Әрине, қайталанатын ұяшықтардың көп санымен реңктерді ажырату қиын болады, бірақ салыстырмалы түрде аз көшірмелермен бұл әдіс тамаша жұмыс істейді.
Бұл макросты пайдалану үшін пернелер тіркесімін басыңыз Alt + F11 немесе батырма Visual Basic қойындысы Әзірлеуші, мәзір арқылы жаңа бос модульді кірістіріңіз Кірістіру – модуль және осы макростың кодын сол жерге көшіріңіз:
Sub DuplicatesColoring() Dim Dupes() 'Көшірмелерді сақтау үшін алапты жариялау ReDim Dupes(1-ден Selection.Cells.Count, 1-ден 2-ге дейін) Selection.Interior.ColorIndex = -4142 'Әр ұяшық үшін i = 3 болса, толтыруды алып тастаңыз. Таңдау WorksheetFunction.CountIf(Selection, cell.Value) > 1 Содан кейін k = LBound(Dupes) To UBound(Dupes) 'егер ұяшық әлдеқашан көшірмелер массивінде болса, толтырыңыз If Dupes(k, 1) = ұяшық Содан кейін ұяшық.Интерьер. ColorIndex = Dupes(k, 2) Келесі k 'егер ұяшықта көшірме болса, бірақ әлі массивте болмаса, оны массивке қосыңыз және оны толтырыңыз Егер cell.Interior.ColorIndex = -4142 Содан кейін cell.Interior.ColorIndex = i Көшірмелер(i, 1 ) = ұяшық.Мән Көшірмелер(i, 2) = ii = i + 1 Егер Аяқталса, Келесі ұяшық Соңы Ішкі болса
Енді сіз парақта деректері бар кез келген ауқымды таңдап, пернелер тіркесімін пайдаланып макросты іске қоса аласыз Alt + F8 немесе түйме арқылы макростар (Макростар) қойындысы әзірлеуші (Әзірлеуші).
- Көшірмелерді түспен бөлектеңіз
- Макростар дегеніміз не, Visual Basic бағдарламасында макрокодты қайда енгізу керек, оларды іске қосу
- Берілген ұяшықтар ауқымындағы бірегей мәндердің санын қалай санауға болады