Хороший вопрос, но плохой файл-пример
В примере нужно 4 Вами заполненных столбца -

Где_ищем
Что_ищем
Требуемый_результат
Пояснение_к_результату

И побольше вариантов, не три, два из которых по сути одинаковы, а штук 20 хотя бы

кросс
http://www.excelworld.ru/forum/2-41201-1#273341

Я модератор того форума. Под каким ником Вы там зарегистрировались?

У меня с первым символом очень похожая фигня в 2010 Excel. В 2013 все нормально. Это похоже мой первый вариант http://www.excelworld.ru/forum/2-40806-270434-16-1550238568 что-то попортил

А код в модуле листа - да просто мне так больше нравится писать (при отсутствии каких-либо предпочтений для местонахождения кода, конечно). Быстрее добраться до него - ПКМ на ярлык, исходный текст

Андрей VG, я тоже думал, что долго будет, а потом смотрю - не, вроде довольно-таки приемлимо
На моей машине, которую собирали 6 лет назад, 10 000 ячеек обрабатывает 28 секунд. Для работы с форматами - вполне

С твоим макросом, конечно же, по скорости не сравнить, но видишь, ограничение. У меня, кстати, ругается не на 1000 ячеек, а почему-то на немногим больше 100. Все ячейки с текстом "Иван Иванов (сын Ивана Ивановича)". Причем ругается на плавающее количество ячеек - примерно от 106 до 120, на каждый запуск макроса пропускает разное количество

Так нужно?
=СЧЁТЕСЛИ(A$2:A$86;"*"&J2&"*")

lahesis333, в следующий раз на всех форумах сообщайте о кроссах. Это есть в Правилах форума, как этого, так и того

И на другом форуме отписаться тоже не помешало бы

Можно и сдвигать
=СРЗНАЧ(ИНДЕКС($B3:$U3;1+5*(V1-1)):ИНДЕКС($B3:$U3;5*V1))

Так нужно?
=ЕСЛИОШИБКА(СРЗНАЧЕСЛИ($B1:$U1;V1;$B3:$U3);)

Читайте справку по СУММЕСЛИМН
"Важно: Каждый дополнительный диапазон должен состоять из такого же количества строк и столбцов, что и аргумент диапазон_условия1. Эти диапазоны могут не находиться рядом друг с другом".

Всю кучу в одну формулу можно так
=СУММПРОИЗВ(СЧЁТЕСЛИМН(Проверка!$D$2:$D$1692;"3";Проверка!$G$2:$G$1692;{"Изолятор":"заземление"}))
Вовнутрь фигурных скобок напишите всё то, что нужно. Или в ячейки напишите, тогда формула
=СУММПРОИЗВ(СЧЁТЕСЛИМН(Проверка!$D$2:$D$1692;"3";Проверка!$G$2:$G$1692;A40:A99))
в A40:A99 написаны условия (можно с пустыми ячейками)

Так?
=СУММ(--ТЕКСТ(ПРАВБ(ПОДСТАВИТЬ(A2:O2;"\";"000");4);"0;;;\0"))&ТЕКСТ(СУММ(--ТЕКСТ(ПСТР(ПОДСТАВИТЬ(Т(+A2:O2);"\";"   ");2;4);"0;;;\0"));"\Н0;;")

А могут быть значения типа 555, Н342, Н117\565?
Варианты еще
Массивные
=СУММ(--ТЕКСТ(ПРАВБ(ПОДСТАВИТЬ(A2:O2;"\";"000");4);"0;;;\0"))&"\Н"&СУММ(--ТЕКСТ(ПСТР(ПОДСТАВИТЬ(Т(+A2:O2);"\";"   ");2;4);"0;;;\0"))
=СУММ(ЕСЛИОШИБКА(--ПРАВБ(ПОДСТАВИТЬ(A2:O2;"\";"000");4);))&"\Н"&СУММ(ЕСЛИОШИБКА(--ПСТР(ПОДСТАВИТЬ(Т(+A2:O2);"\";"   ");2;4);))
Немассивный
=СУММпроизв(--ТЕКСТ(ПРАВБ(ПОДСТАВИТЬ(A2:O2;"\";"000");4);"0;;;\0"))&"\Н"&СУММпроизв(--ТЕКСТ(ПСТР(ПОДСТАВИТЬ(Т(+A2:O2);"\";"   ");2;4);"0;;;\0"))

Никто никого не путает. Внимательно читаем цитату, речь идет именно о формуле массива:
*****
Кстати, что понимается под ? Что такое "массивность"? Определение в студию.  

Элементарно
=МАКС(ИНДЕКС(ДЛСТР(A1:A11);))

Напишите формулу, поставьте в Excel стиль формул R1С1 и посмотрите как формула изменится. Думаю, так понятнее будет. Обратите внимание на то, как изменится ссылка вида RC, если Вы напишете $A$3, $A3, A$3, A3
Стиль меняется Файл - Параметры - Формулы

Так нужно?
=СУММ(ИНДЕКС(C6:C12;ПОИСКПОЗ(D2;B6:B12;)):ИНДЕКС(C6:C12;ПОИСКПОЗ(D3;B6:B12;)))

Переделал Вам шапку таблицы. В А1 вводите первое число нужного месяца. Строки 2 и 3 заполняются автоматически. Раскраска суббот и воскресений тоже автоматически
В УФ формула такая
=МЕДИАНА(4+ИЛИ(ДЕНЬНЕД(B$2;2)=1;ДЕНЬНЕД(B$2;2)=5);5+ИЛИ(ДЕНЬНЕД(B$2;2)=1;ДЕНЬНЕД(B$2;2)=5);B4)=B4
Для 2013 и 2016 Excel можно покороче формулу написать

Все правильно. У Вас там числовые значения. То, что Вы поставили им текстовый формат, ничего не меняет - это числа в ячейках, которые в текстовом формате (смотрите голубые ячейки с формулами ЕЧИСЛО и ЕТЕКСТ)
А вот если в соседнем столбце написать
=A1&""
, то это будет уже текст (несмотря на то, что формат в ячейках не текстовый)
Тогда формулу можно написать так
=СЧЁТЕСЛИ(B:B;7&ЛЕВБ(C3;4)&"*")
или так
=СЧЁТЕСЛИ(B:B;"*"&ЛЕВБ(C3;4)&"*")

Звездочка подразумевает текстовые значения в массиве для поиска
У Вас можно написать
=СЧЁТЕСЛИМН(H:H;">=781420000";H:H;"<=781429999")
А вообще Вам нужно было бы приложить свой файл

va-grom, рисовать самому с нуля лень. Вот Вы сделайте диаграмму "почти как нужно" и опишите, что там доделать надо, тогда да, можно попробовать

KILOJOUL, а зачем Вы делаете ссылку на строку 10? Может, проще выделить ячейки С12:AF12, ввести в первую ячейку формулу
=ТРАНСП(A1:A31)
и нажать Контрл Шифт Ентер?

Еще пара немассивных вариантов
=СУММПРОИЗВ((ABS(Ч(+A3:AD3))>8)*(ABS(Ч(+A3:AD3))-8))
=СУММПРОИЗВ(ТЕКСТ(A3:AD3;"[>8]0;[<-8]0;\8;\8")-8)

blizardo,Вы бы посмотрели что там у Вас на остальных трех листах

Не совсем так, СУММЕСЛИМН тоже берет двумерные массивы, только нужно следить, чтобы у всех аргументов "диапазон ..." были одинаковые размерности
А формулу предлагаю такую (ничего в файле не меняя)
=СУММЕСЛИМН(D3:JE3;$L$1:$JM$1;">="&$B$16;$L$1:$JM$1;"<="&$B$17)

Range у Вас относится к wrkBook.Worksheets(1)
А Cells к чему относится?
Намек понятен?

А нужно сделать как в каком столбце?
И вообще - что дано и что нужно получить?

Я знал. Иначе бы не поставил два минуса здесь =--B$2:B$99
Это действительно косяк. Вот тк нужно
=ЕСЛИОШИБКА(ПРОСМОТР(;-1/(МАКС((A2=A$2:A$9)*(B$2:B$9-B2<0)*B$2:B$9)=--B$2:B$9);C$2:C$9);"--")
С самого начала хотел так написать, потом почему-то (типа короче и вроде работает) написал так, как написал в посте выше

Я исходил из того, что поскольку время в секундах, то это явно считыватель (или человечий ввод с автопроставкой времени) на проходной. Два человека с одной картой одновременно пройти не могут.
Действительно, что-то здесь автор явно недоговаривает. На ExcelWorld я то же самое написал:
"Вообще-то это одинаковые формулы. Если у Вас они дали разные результаты, то покажите в файле"

В общем, Алексей Максимович когда файл приложит, то посмотрим

Из кросса
=ПРОСМОТР(;-1/(МАКС((A2=A$2:A$99)*(B$2:B$99<B2)*B$2:B$99)=--B$2:B$99);C$2:C$99)&""