✅ Како бројати Обојене ћелије у Екцелу (Корак по корак водич + ВИДЕО)

Преглед садржаја

Како бројати обојене ћелије у Екцелу

Погледајте видео - Како пребројати обојене ћелије у Екцелу

Зар не би било сјајно да постоји функција која може да броји обојене ћелије у Екцелу?

Нажалост, не постоји уграђена функција за то.

АЛИ…

То се лако може учинити.

Како бројати обојене ћелије у Екцелу

У овом водичу ћу вам показати три начина бројања обојених ћелија у Екцелу (са и без ВБА):

Коришћење филтера и функције СУБТОТАЛ
Коришћење функције ГЕТ.ЦЕЛЛ
Коришћење прилагођене функције креиране помоћу ВБА

#1 Преброј обојене ћелије помоћу филтера и СУБТОТАЛА

Да бисте бројали ћелије у боји у Екцелу, морате да користите следећа два корака:

Филтрирајте обојене ћелије
Користите функцију СУБТОТАЛ за пребројавање обојених ћелија које су видљиве (након филтрирања).

Претпоставимо да имате скуп података као што је приказано испод:

У овом скупу података користе се две боје позадине (зелена и наранџаста).

Ево корака за бројање обојених ћелија у Екцелу:

У било којој ћелији испод скупа података користите следећу формулу: = СУБТОТАЛ (102, Е1: Е20)
Изаберите заглавља.
Идите на Подаци -> Сортирај и филтрирај -> Филтрирај. Ово ће применити филтер на сва заглавља.
Кликните на било који од падајућих падајућих филтера.
Идите на „Филтрирај по боји“ и изаберите боју. У горњем скупу података, пошто се за истицање ћелија користе две боје, филтер приказује две боје за филтрирање ових ћелија.

Чим филтрирате ћелије, приметићете да се вредност у функцији СУБТОТАЛ мења и враћа само број ћелија које су видљиве након филтрирања.

Како ово ради?

Функција СУБТОТАЛ користи 102 као први аргумент, који се користи за пребројавање видљивих ћелија (скривени редови се не броје) у наведеном опсегу.

Ако се подаци не филтрирају, враћа се 19, али ако се филтрира, враћа само број видљивих ћелија.

Испробајте сами … Преузмите датотеку за пример

#2 Броји обојене ћелије помоћу функције ГЕТ.ЦЕЛЛ

ГЕТ.ЦЕЛЛ је функција Мацро4 која је задржана због разлога компатибилности.

Не ради ако се користи као редовне функције на радном листу.

Међутим, ради у Екцел именованим опсезима.

Такође видети: Сазнајте више о функцији ГЕТ.ЦЕЛЛ.

Ево три корака за коришћење ГЕТ.ЦЕЛЛ за бројање обојених ћелија у Екцелу:

Креирајте Намед Ранге помоћу функције ГЕТ.ЦЕЛЛ
Користите Намед Ранге да бисте унели код боје у колону
Коришћење броја боје за бројање ћелија у боји (по боји)

Заронимо дубоко и видимо шта да радимо у сваком од три поменута корака.

Креирање именованог опсега

Идите на Формуле -> Дефинирај назив.
У дијалогу Ново име унесите:
- Назив: ГетЦолор
- Опсег: Радна свеска
- Односи се на: = ГЕТ.ЦЕЛЛ (38, Лист1! $ А2)
  У горњој формули сам користио Лист1! $ А2 као други аргумент. Морате да користите референцу колоне у којој имате ћелије са бојом позадине.

Добијање кода боје за сваку ћелију

У ћелији поред података користите формулу = ГетЦолор

Ова формула би вратила 0 ако нема боје позадине у ћелији и вратила би одређени број ако постоји боја позадине.

Овај број је специфичан за боју, па све ћелије са истом бојом позадине добијају исти број.

Бројте обојене ћелије помоћу кода боје

Ако следите горњи поступак, имаћете колону са бројевима који одговарају боји позадине у њој.

Да бисте добили број одређене боје:

Негде испод скупа података дајте исту боју позадине ћелији коју желите да пребројите. Уверите се да то радите у истој колони коју сте користили при креирању именованог опсега. На пример, користио сам колону А, па ћу користити ћелије само у колони „А“.
У суседној ћелији користите следећу формулу:

= ЦОУНТИФ ($ Ф $ 2: $ Ф $ 20, ГетЦолор)

Ова формула ће вам дати број свих ћелија са наведеном бојом позадине.

Како то функционише?

Функција ЦОУНТИФ користи именовани опсег (ГетЦолор) као критеријум. Именовани опсег у формули односи се на суседну ћелију са леве стране (у колони А) и враћа код боје за ту ћелију. Дакле, овај код боје је критеријум.

Функција ЦОУНТИФ користи опсег ($ Ф $ 2: $ Ф $ 18) који садржи бројеве кодова боја свих ћелија и враћа број на основу броја критеријума.

Испробајте сами … Преузмите датотеку за пример

#3 Броји у боји користећи ВБА (стварањем прилагођене функције)

У горње две методе научили сте како да бројите обојене ћелије без употребе ВБА.

Али, ако добро користите ВБА, ово је најлакши од три метода.

Користећи ВБА, креирали бисмо прилагођену функцију која би радила као функција ЦОУНТИФ и враћала број ћелија са одређеном бојом позадине.

Ево кода:

'Код који је направио Сумит Бансал са хттпс://трумпекцел.цом Функција ГетЦолорЦоунт (ЦоунтРанге Ас Ранге, ЦоунтЦолор Ас Ранге) Дим ЦоунтЦолорВалуе Ас Интегер Дим ТоталЦоунт Ас Интегер ЦоунтЦолорВалуе = ЦоунтЦолор.Интериор.ЦолорИндек Сет рЦелл = ЦоунтРанге За сваку рЦелл рЦелл.Интериор.ЦолорИндек = ЦоунтЦолорВалуе Затим ТоталЦоунт = ТоталЦоунт + 1 Енд Иф Нект рЦелл ГетЦолорЦоунт = ТоталЦоунт Крајња функција

Да бисте креирали ову прилагођену функцију:

Док је радна свеска активна, притисните Алт + Ф11 (или кликните десним тастером миша на картицу радног листа и изаберите Прикажи код). Ово би отворило ВБ Едитор.
У левом окну, испод радне свеске у којој радите, кликните десним тастером миша на било који радни лист и изаберите Уметни -> Модул. Ово би убацило нови модул. Копирајте и залепите код у прозор кода модула.
Двапут кликните на назив модула (подразумевано име модула у Модулу 1) и налепите код у прозор за код.
Затворите ВБ Едитор.
То је то! Сада имате прилагођену функцију на радном листу под називом ГетЦолорЦоунт.

Да бисте користили ову функцију, једноставно је користите као било коју редовну Екцел функцију.

Синтакса: = ГетЦолорЦоунт (ЦоунтРанге, ЦоунтЦолор)

ЦоунтРанге: опсег у којем желите да бројите ћелије са наведеном бојом позадине.
ЦоунтЦолор: боју за коју желите да бројите ћелије.

Да бисте користили ову формулу, користите исту боју позадине (коју желите да бројите) у ћелији и користите формулу. Аргумент ЦоунтЦолор би био иста ћелија у коју уносите формулу (као што је приказано испод):