Сумма по цвету заливки при условном форматировании

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

Сумма по цвету заливки при условном форматировании (Формулы/Formulas)

rvshestakov

Дата: Четверг, 26.10.2017, 12:59 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 56

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

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

Excel 2010

Добрый день, товарищи!
Загуглил тему и прошу подтверждения: невозможно определить цвет заливки ячейки, если применено условное форматирование?

Ответить

_Boroda_

Дата: Четверг, 26.10.2017, 13:13 | Сообщение № 2

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

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

Сообщений: 16881

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

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Цитата rvshestakov, 26.10.2017 в 12:59, в сообщении № 1 (

)

невозможно определить цвет заливки ячейки, если применено условное форматирование

Почему?
[vba]

Код

Interior.Color

[/vba]
Да и вот так можно (см. именованный диапазон - Контрл F3). Правда, всего 56 цветов, но не в этом суть

Код

=ПОЛУЧИТЬ.ЯЧЕЙКУ(63;Лист1!A1)

Файл перевложил

============
Или Вам нужно не цвет залавки ячейки, а цвет, которым залило ячейку условное форматирование? Это разные вещи

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

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

sboy

Дата: Четверг, 26.10.2017, 13:14 | Сообщение № 3

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2566

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

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

Excel 2010

Добрый день.
Опровергаю! если к ячейке применяется одно правило УФ, то легко определить.
Если правил несколько, то уже надо думать-экспериментировать)

Яндекс: 410016850021169

Ответить

rvshestakov

Дата: Четверг, 26.10.2017, 14:06 | Сообщение № 4

Группа: Пользователи

Ранг: Участник

Сообщений: 56

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

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

Excel 2010

Цитата

Или Вам нужно не цвет заливки ячейки, а цвет, которым залило ячейку условное форматирование?

Именно это и надо.

Цитата

Это разные вещи

Я это понял, когда Interior.Color не посчитал условно отформатированную заливку

вот функция, которую я применяю.
[vba]

Код

Function цветофункцияЗнач(Диапазон_суммирования As Range, Цвет_берется_из_ячейки As Range)
For Each cll In Диапазон_суммирования.Cells
If cll.Interior.ColorIndex = Цвет_берется_из_ячейки.Interior.ColorIndex Then
summa = summa + 1
End If
Next
цветофункцияЗнач = summa
End Function

[/vba]

Ответить

sboy

Дата: Четверг, 26.10.2017, 14:23 | Сообщение № 5

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2566

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

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

Excel 2010

Для примера
[vba]

Код

        If cll.FormatConditions.Count Then
            cell_color = cll.FormatConditions(1).Interior.Color
        Else: cell_color = cll.Interior.Color
        End If

[/vba]
НО! нужно смотреть реальный файл, т.к. цвет будет считываться даже когда правило УФ не выполняется.
По сути cll.FormatConditions(1).Interior.Color выдает цвет для первого (по порядку) правила УФ в этой ячейке и не важно правило выполняется или нет.