У овом чланку ћемо креирати прилагођену функцију за израчунавање збира бројева у ћелијама у опсегу који има дефинисану боју.
У овом примеру, узорци се састоје од података продајног тима. Подаци продајног тима садрже детаље везане за број продатих артикала. Садржи информације о производу који је доступан у три боје: сивој, црвеној и зеленој. Желимо да пронађемо збир продатих артикала по боји производа.
Да бисмо израчунали збир по боји, креирали смо прилагођену функцију „СумБиЦолор“. Ова функција узима два параметра распона као улаз. Параметар првог опсега дефинише унутрашњу боју ћелије, а други параметар опсега дефинише опсег узорка.
Објашњење кода
Апплицатион.Волатиле се користи јер ће се поново израчунати сваки пут када се вредност ћелије промени у радној свесци.
ДефинедЦолорРанге.Интериор.ЦолорИндек
Горњи код се користи за добијање унутрашње боје дефинисаног опсега.
Молимо следите доле за код
Опција Експлицитна функција СумБиЦолор (ДефинедЦолорРанге Ас Ранге, СумРанге Ас Ранге) Апплицатион.Волатиле 'Декларисање променљивих Дим ИЦол Ас Интегер Дим ГЦелл Ас Ранге' Добијање унутрашње боје ћелије ИЦол = ДефинедЦолорРанге.Интериор.ЦолорИндек 'Лоопинг кроз сваки дефинисани опсег ГЦелл Ин СумРанге Иф ИЦол = ГЦелл.Интериор.ЦолорИндек Тхен 'Добијање збира одговарајуће обојене ћелије СумБиЦолор = СумБиЦолор + ГЦелл.Валуе Енд Иф Нект Функција ГЦелл Енд
Ако вам се допао овај блог, поделите га са пријатељима на Фацебооку. Такође, можете нас пратити на Твиттер -у и Фацебоок -у.
Волели бисмо да чујемо од вас, јавите нам како можемо побољшати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште