Передать формулу в Data Bars при офсете

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Передать формулу в Data Bars при офсете (Макросы/Sub)

user0

Дата: Пятница, 20.01.2017, 04:05 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 152

Репутация: 8 ±

Замечаний: 0% ±

Excel 2013, 2016

Доброго времени суток,

Сделал раскрашивание столбцов дата барами в диапазоне.

Вопрос, можно ли передать формулу в одно из условий условного форматирования, если ячейка определяется через "офсет"?
Например, ячейки в столбце А с красным датабаром.
Чтобы, например у А3 в условиях форматирования максимум был задан не числом, а формулой (например =A3*A3/B3)

Вопрос скорее теоретический, потому что все форматирование и так обновляется при изменении значений в диапазоне, но вот если бы не обновлялось и код запускался только раз, задавая форматирование единожды.. было бы полезно иметь там формулы )

К сообщению приложен файл: bars.xlsm (30.7 Kb)

Сообщение отредактировал user0 - Пятница, 20.01.2017, 11:11

Ответить

Pelena

Дата: Пятница, 20.01.2017, 12:29 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 19174

Репутация: 4413 ±

Замечаний: ±

Excel 365 & Mac Excel

Здравствуйте.
Если правильно поняла
[vba]

Код

cfDataBar.MaxPoint.Modify newtype:=xlConditionValueFormula, newvalue:="=" & oRange(iCnt, 1).Address & "*" & oRange(iCnt, 1).Address & "/" & oRange(iCnt, 2).Address

[/vba]

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

user0

Дата: Пятница, 20.01.2017, 12:53 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 152

Репутация: 8 ±

Замечаний: 0% ±

Excel 2013, 2016

Да, все верно, такого результата я и добивался.
Спасибо.

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Передать формулу в Data Bars при офсете (Макросы/Sub)

Страница 1 из 1
1