300 Примера

Динамички опсег

Dynamic Range

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





Ситуација:

Сваки пут када додамо број и притиснемо командно дугме, желимо да Екцел ВБА обоји максималну вредност ових бројева.





Динамички опсег у програму Екцел ВБА

Поставите а командно дугме на радном листу и додајте следеће линије кода:



1. Прво, декларишемо једну променљиву и два Ранге објекта. Једну променљиву типа Доубле називамо максимум. Објекте Ранге називамо рнг и ћелија.

НиједанмаксимумКао Доубле, рнгКаоДомет, ћелијаКаоДомет

2. Додајемо линију која мења боју позадине свих ћелија у „Без испуне“.

Целлс.Интериор.ЦолорИндек = 0

3. Покрећемо рнг бројевима. Ми користимо ЦуррентРегион имовине за ово. ЦуррентРегион је користан када унапред не знамо тачне границе опсега.

Комплетрнг = Опсег ('А1'). ЦуррентРегион

4. Покрећемо максимум максималном вредношћу бројева. Користимо функцију радног листа Мак да пронађемо максималну вредност.

макимум = ВорксхеетФунцтион.Мак (рнг)

5. На крају, бојимо максималну вредност. Користимо Фор Фор Нект Нект Лооп.

За СвакимобилниИнрнг
Акоћелија.Вредност = максимумОндацелл.Интериор.ЦолорИндек = 22
Следећимобилни

Напомена: уместо ЦолорИндек броја 22 (црвено), можете користити било који ЦолорИндек број.

6. Додајте број.

како се користи формула месеца у Екцелу

Резултат када притиснете командно дугме на листу:

Резултат динамичког опсега

3/14 Завршено! Сазнајте више о објекту опсега>
Идите на следеће поглавље: Променљиве



^