Страницы: 1
RSS
Посчитать количество ячеек, выделенных с помощью УФ
 
Добрый день, подскажите как можно посчитать количество цветных ячеек в каждой строке, если цвет был задан им через условное форматирование?
 
Макросом, UDF (создать пользовательскую функцию, которая будет считать закрашенные ячейки в указанном диапазоне)
Изменено: New - 11.01.2021 12:37:03
 
Цитата
DJMC написал:
цвет был задан им через условное форматирование?
если условие известно - можно его же использовать в обычной формуле для подсчета. Но с модификациями, скорее всего.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Цитата
DJMC: если цвет был задан им через условное форматирование
… то и посчитать можно, задав аналогичные условия
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Цитата
New написал:
создать пользовательскую функцию, которая будет считать закрашенные ячейки в указанном диапазоне
New, а как вы планируете отследить закраску идущую через УФ?
Соблюдение правил форума не освобождает от модераторского произвола
 
DJMC, Вы приложите файл с примером, как описано в правилах форума, и помощь будет конкретной
 
Добавил файл в первое сообщение,  все строки меняются постоянно, в 697 строке вносится строка которая потом ищется.
 
В ячейку В698 вводите формулу:
Код
=СЧЁТЕСЛИ(B$2:B$695;B$697)
протягиваете вправо до конца таблицы. Это для каждого столбца отдельно.
Все закрашеные:
Код
=СУММПРОИЗВ(--(B2:P695=B697:P697))
А вообще было бы неплохо, если бы Вы изначально написали или показали каким видите результат: все ячейки надо подсчитать или для каждого столбца отдельно...
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Цитата
buchlotnik: отследить закраску идущую через УФ
отображаемую через УФ фоновую заливку видно вот так: rng.DisplayFormat.Interior.Color
Изменено: Jack Famous - 11.01.2021 13:17:33
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
мне нужно чтобы считалось сбоку все каждая строка по горизонтали, сделал как написано выше, но почему то подсчет идет не верный.
 
Цитата
Jack Famous написал:
видно вот так: rng.DisplayFormat.Interior.Color
только в UDF это не работает :)
Цитата
DJMC написал:
нужно чтобы считалось сбоку все каждая строка по горизонтали
Чесслово - ну не первый день на форуме, а ни примера сразу, ни задачи подробной :) Но это так, лирика. В общем все не сложно решается:
Код
=СУММПРОИЗВ(--(B2:P2=$B$697:$P$697))
Изменено: Дмитрий(The_Prist) Щербаков - 11.01.2021 13:32:19
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Большое спасибо, Дмитрий. Действительно решение оказалось простым и изящным
Изменено: DJMC - 11.01.2021 13:41:50
 
Цитата
Дмитрий(The_Prist) Щербаков: в UDF это не работает
проверил - действительно. Не знал - спасибо  ;)  :idea:
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Цитата
Jack Famous написал:
проверил - действительно
а можно сначала было проверить... Я ж не от нечего делать писал  ;)
Соблюдение правил форума не освобождает от модераторского произвола
 
Цитата
buchlotnik написал:
Я ж не от нечего делать писал  
так кто ж знает что ты там  колбе намешал.  :)  Коктейльную трубочку вот уже приготовил. Судя по цвету, сегодня  компари с апельсиновым соком....  :D
По вопросам из тем форума, личку не читаю.
 
Цитата
buchlotnik: Я ж не от нечего делать писал
Цитата
БМВ: так кто ж знает
вот да)) никто не может знать всего, а DisplayFormat — не такое популярное свойство; я его вообще только 2 недели назад нагуглил, когда с цветами и палитрами разбирался  :D
Изменено: Jack Famous - 12.01.2021 09:08:14
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Цитата
Jack Famous написал:
никто не может знать всего
это да, вот только вопрос поднимался уже неоднократно
Соблюдение правил форума не освобождает от модераторского произвола
 
buchlotnik, Миш, ну харош уже — я написал, ты бы сказал (как Дима), что это только для процедур и не сработает в функции, я бы проверил, подтвердил и поблагодарил за науку  :D
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
Страницы: 1
Наверх