Садржај
Формулисање проблема
Желео бих да колоне на хистограму (или делови на кружном графикону, итд.) аутоматски имају боју која је коришћена за попуњавање одговарајућих ћелија изворним подацима:
Предвиђајући изненађене и огорчене повике појединих другова, треба напоменути да се, наравно, боја испуне дијаграма може мењати и ручно (десни клик на колону – Формат тачке/серија (Форматирајте тачку/серију података) итд – нико не расправља. Али у пракси постоји много ситуација када је лакше и згодније то учинити директно у ћелијама са подацима, а затим би графикон требало да се аутоматски префарба. Покушајте, на пример, да подесите попуњавање по региону за колоне у овом графикону:
Мислим да схватате идеју, зар не?
Решење
Ништа осим макроа не може ово да уради. Стога, отварамо Висуал Басиц едитор са картице развијач (Програмер — Висуал Басиц Едитор) или притисните пречицу на тастатури Алт + ФКСНУМКС, убаците нови празан модул кроз мени Инсерт – Модул и тамо копирајте текст таквог макроа, који ће обавити сав посао:
Суб СетЦхартЦолорсФромДатаЦеллс() Иф ТипеНаме(Селецтион) <> "ЦхартАреа" Тхен МсгБок "Сначала виделите диаграмму!" Екит Суб Енд Ако је постављено ц = АцтивеЦхарт За ј = 1 На ц.СериесЦоллецтион.Цоунт ф = ц.СериесЦоллецтион(ј).Формула м = Сплит(ф, ",") Постави р = Ранге(м(2)) За и = 1 То р.Целлс.Цоунт ц.СериесЦоллецтион(ј).Поинтс(и).Формат.Филл.ФореЦолор.РГБ = _ р.Целлс(и).Интериор.Цолор Нект и Нект ј Енд Суб
Сада можете затворити Висуал Басиц и вратити се у Екцел. Коришћење креираног макроа је веома једноставно. Изаберите графикон (подручје графикона, а не област графикона, мрежу или колоне!):
и покрените наш макро помоћу дугмета Макрои табулатор развијач (Програмер — Макрои) или пречицом на тастатури Алт + ФКСНУМКС. У истом прозору, у случају честе употребе, макроу можете доделити пречицу на тастатури помоћу дугмета parametri (Опције).
PS
Једина мува у масти је немогућност коришћења сличне функције за случајеве када се боја додељује ћелијама изворних података помоћу правила условног форматирања. Нажалост, Висуал Басиц нема уграђени алат за читање ових боја. Постоје, наравно, одређене „штаке“, али оне не раде за све случајеве и не у свим верзијама.
- Шта су макрои, како их користити, где убацити макро код у Висуал Басиц
- Условно форматирање у програму Екцел 2007-2013
- Шта је ново у графиконима у програму Екцел 2013