да, не так. Первый аргумент должен быть диапазон, а любая обработка , подобная той что вы делали, превращает диапазон в массив, при этом только замедляет процесс.
Так как у вас новый Excel, то можно вот так =COUNTIF($B$3:$B$779;L3:L10&"*"), чтоб не протягивать.

Может не стоит использовать новшества, а просто посчитать так
=COUNTIF($B:$B;L3&"*")

просто это скорость сети  - а вы что подумали?  

НА VBA - серьезно? не ну все зависит от хотелок и ТЗ Но взрослые движки не всегда справляются, а тут на VBA.  

не совсем. все ж скорее события надо изолировать. А судя по #3,  как  раз этого то и не было.

Было любопытно, можно ли сделать что-то универсальное. В открытых источниках, не копая сильно, таблица языков из 226 элементов 94 из них можно легко свести к 64 из за полного совпадения, остальные  могут содержать приколы в расхождении в одном или в двух месяцах. таким образом  можно сделать конечно таблицу чуть меньше чем 226x12 построенную автоматом, но даже массив из 226 нужно практически руками вписать для генерации. Максимальное количество уникальных получилось в Июне -  97.для разных языков. то есть чисто гипотетически можно заложить в таблицу 1098 названий и исходя из совпадения определить месяц.
 

Это когда у каждого поля есть собственный консул?  

В зависимости от версии excel Консульство может работать с формулами как в кроссе или только с макросами. Про файл уже выше написали.

Юра, после длительного разговора, все ж оставлю отметинку тут.

С Днем Рождения дорогой.

Все знают, что сем старше тем все больше стирается разница в возрасте и Юра , не смотря на то что в отцы даже мне годится, стал и остается моим товарищем. Юра так держать, не болеть и меньше поводов для расстройства тебe желаю.

И да и нет, есть такое понятие APDEX . Если в двух словах, то операция должна выполнятся по длительности с незначительными отклонениями от эталонного или принятого замера. Вот тут и начинается , что 3 сек для одного мало. а для другого долго.  представьте обработку длительностью 3 секунды информации которая поступает ежесекундно по несколько десятков записей. То есть за 3 секунды отчет уже устарел. Ну или просто ждать три сек долго.  

в  VBS подпрограмма или функция может быть описана в любом месте основного кода типа

Вот где поле для сюрпризов :-) Я когда первый раз столкнулся был сильно поражен . Сейчас уже не помню, проверял но результат не воспроизведу можно ли функцию внутри функции описать. Если да - то совсем можно запутать всех.


Ушли от темы про быстродействие

=DATE(LEFT(RIGHT(A2;5);4);FIND(MID(A2;FIND(" ";A2)+2;2);" anebarpraiunulugepktovec")/2;LEFT(A2;2))

Что касаемо языка, то без понимания, что это за язык будет очень сложно, уж слишком много вариантов.
Русский , Англ. Нем. Фр. Ит. Исп.

Код
=DATE(LEFT(RIGHT(A2;5);4);MAX((COUNTIF(A2;"*"&SUBSTITUTE(TEXT(DATE(;{1;2;3;4;5;6;7;8;9;10;11;12};1);"[$-"&{407\409\"40C"\410\419\"C0A"}&"]МММ");".";)&"*")*{1;2;3;4;5;6;7;8;9;10;11;12}));LEFT(A2;2))

Без оптимизации и без учета регионалок ибо МММ - в данном случае RUS

Максим Исаев, А эта череда постов зачем? В одном сообщении не было возможности ответить?

Р.Н. С.,  пример бы упростил всем жизнь.

nilske, красота ли?

1. Если что-то работает медленно - это не значить что оно потребляет мало ресурсов, скорее наоборот, потребляет много, а выполняется долго - береги планету, не грей воздух
2. Вот так один макрос отработал чуть медленнее. второй в сравнении с ним тоже едва заметно четь медленнее , а вместе за день накоплено куча времени ожидания - Копейка  рубль бережет
3. Если разовый макрос  - конечно не стоит вылизывать, если конечно сразу не удалось оптимально написать. Я часто, например для PowerShell, не код пишу с перебором, а в таблице готовлю набор однотипных команд с параметрами, одну отладил, остальные копипэстом запустил.  Но если это постоянно работающее, то просто недопустимо шлак в продуктив отправлять, хотя сейчас стало не модно код причесывать. Накидают абы как.

Ska3o4Nikc,  Читаем правила , меняем отображаемое имя. Помощь скрыта.
МатросНаЗебре,  Куда опять спешим?

=REPLACE(A1;4;1;"-")

- вроде это справа :-)
=REPLACE(A1;LEN(A1)-3;1;"-")

я б этот ад не заполнял совсем ;-)

evgeniygeo, с точки зрения все в одном у нас 366×20×кол лет расчетов. Многие повторяются и только грузят проц.

1. Участок после отпуска считать можно так
=MOD(COUNT($B2:EC2)-1;20)+$B2+1 но
2. для сокращения объема расчетов, а на каждый день это много, лучше для дня считать вхождение его в отпускной период отдельной строкой и результат использовать в остальных.
3. Формулу 1 использовать в тех ячейка которые идут после отпуска, то есть после пропуска только , а в остальных прибавлять 1 к предыдущему дню.

В файле не могу показать не успеваю.

на самом деле все еще сложнее ибо правильнее


на случай если активнеа книга в xls а данных более 64К строк

В общем случае

#7
Дополнительно проверить длинну  - не проблема.

так пререведите функции на тот язык на котором привыкли работать.

mitya528,  так ваши Cells(Rows.Count, 1).End(xlUp).Row + 1 на активном листе отрабатывают , а там на первом шаге очищается все.

Павел \Ʌ/,  по этому с латиницей и проще :-)

чтоб формула соотвтевовала теме ;-) . эти пробелы игнорируются в формулах. Просто случайно затесался.

Дааа, а потом такие гении приходят в реальный мир и ничего не могу сделать.

Интересно , сложен ли пароль: _1Ab
все соблюдено.
В современном мире 2FA  защищает.

А по вопросу, Все просто . Если нужно иметь спец символы , цифры и буквы разного регистра, то достаточно проверить вхождение символа в одну из групп и просуммировать - жолжно быть в сумме 4, массивка исключающая кириллицу
=SUM(--ISNUMBER(MATCH({1\2\3\4};IFERROR(LOOKUP(CODE(MID(F26;ROW(1:99);1));{0;48;58;65;91;97;123;192};{1;2;1;3;1;4;1;0});0);)))=4

при этом должна быть еще длина пароля, но об этом в пятом классе еще не проходили.

=REPLACE(CELL("filename");1;FIND("]";CELL("filename"));"") но лучше
=REPLACE(CELL("filename";a1);1;FIND("]";CELL("filename";a1));"") а вот это A1 это та ячейка где эта формула.
Дело в том что без второго аргумента формула вернет результат исходя из активной ячейки, то есть находясь на другом листе пересчет выдаст там имя активного листа что может привести к интересным последствиям.

Лучшая книга - это этот форум ;-) тут бесконечное множество примеров из жизни.

В условии "????????????" Но там должен быть текст, а не число. Если там число, то проверяем как число. А если там впереди идущие нули форматом заданы, то нужен файл с примером. То что функция приводит текс к числу если может -это факт.