ГосНомер - Страница 3

Дата: Вторник, 02.09.2014, 08:26 | Сообщение № 42

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

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

Сообщений: 4517

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

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

Excel 2003

А123 С50 - ЛОЖЬ
А12 ВС50 - ИСТИНА

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Pelena

Дата: Вторник, 02.09.2014, 09:06 | Сообщение № 43

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

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

Сообщений: 19401

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

Замечаний: ±

Excel 365 & Mac Excel

У меня оба варианта ЛОЖЬ
96 знаков

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

Дата: Вторник, 02.09.2014, 12:08 | Сообщение № 44

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

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

Сообщений: 2941

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

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

Враг не пройдет - оба ЛОЖЬ.

Nic70y

Дата: Вторник, 02.09.2014, 14:33 | Сообщение № 45

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

Ранг: Экселист

Сообщений: 8999

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

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

Excel 2010

Ну неужели ни одной подляны я вам не подкину?

К сообщению приложен файл: 18.xls (28.5 Kb)

ЮMoney 41001841029809

Дата: Вторник, 02.09.2014, 14:39 | Сообщение № 46

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

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

Сообщений: 2941

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

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

Нет, не проходит - мой МУХ всегда на страже. КУ!

MCH

Дата: Вторник, 02.09.2014, 15:41 | Сообщение № 47

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

Ранг: Старожил

Сообщений: 2004

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

Замечаний: ±

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

Дата: Вторник, 02.09.2014, 16:53 | Сообщение № 48

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

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

Сообщений: 4517

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

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

Excel 2003

94 93 без "="

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Сообщение отредактировал AlexM - Вторник, 02.09.2014, 19:26

MCH

Дата: Вторник, 02.09.2014, 21:48 | Сообщение № 49

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

Ранг: Старожил

Сообщений: 2004

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

Замечаний: ±

Есть смысл ждать? вскрываться будем? или до следующего понедельника? у меня идей как сократить формулу больше нет, не могу избавиться от проверки через ДЛСТР(), при этом приходится проверять каждую цифру отдельно, иначе могут проскочить не валидные номера.

Дата: Вторник, 02.09.2014, 21:51 | Сообщение № 50

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

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

Сообщений: 2941

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

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

Я тоже дальше не двигаюсь. Готов к открытию.
Интересно, где ты ужал, ведь у меня нет ДЛСТР(), а она здорово удлиняет.

MCH

Дата: Вторник, 02.09.2014, 23:43 | Сообщение № 51

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

Ранг: Старожил

Сообщений: 2004

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

Замечаний: ±

89 с "="

Michael_S

Дата: Среда, 03.09.2014, 05:55 | Сообщение № 52

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

Ранг: Старожил

Сообщений: 2012

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

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

Excel2016

104, и дальше мыслей нет.
Зы. Уже среда, и я открываюсь. Тем более, что вариант не самый короткий.

Nic70y

Дата: Среда, 03.09.2014, 08:32 | Сообщение № 53

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

Ранг: Экселист

Сообщений: 8999

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

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

Excel 2010

Михаил, это Ваша, только 97, свою не покажу (чего позориться

)

эта тоже Ваша, только 91:

ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Среда, 03.09.2014, 08:34

Дата: Среда, 03.09.2014, 08:44 | Сообщение № 54

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

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

Сообщений: 4517

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

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

Excel 2003

93 без "="

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Pelena

Дата: Среда, 03.09.2014, 08:53 | Сообщение № 55

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

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

Сообщений: 19401

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

Замечаний: ±

Excel 365 & Mac Excel

Код

=СЧЁТ(НАЙТИ(ПСТР(A1;{1;5;6};1);"АВЕКМНОРСТУХ"))+СЧЁТ(-ПСТР(A1;{2;3;4;7;8;9};1))=МАКС(ДЛСТР(A1);8)

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

alex1248

Дата: Среда, 03.09.2014, 08:58 | Сообщение № 56

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

Ранг: Обитатель

Сообщений: 384

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

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

Excel 2007, 2010

У меня 101, массивная (этот вариант появился вчера). Мысли еще есть, если появится вариант, выложу позже

Код

=И(ЕЧИСЛО(ПСТР(A1;{2;3;4;7;8};1)*ПРАВБ(A1)*НАЙТИ(ПСТР(A1;{1;5;6;6;6};1);"АВЕКМНОРСТУХ"));ДЛСТР(A1)<10)

skype alex12481632
Qiwi +79276708519

Сообщение отредактировал alex1248 - Среда, 03.09.2014, 09:00

Дата: Среда, 03.09.2014, 10:13 | Сообщение № 57

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

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

Сообщений: 4517

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

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

Excel 2003

Формула Лены натолкнула на новую мысль.

Код

=СЧЁТ(ПСТР(A1&0;{2;3:4;7:8;9};1)*НАЙТИ(ПСТР(A1;{1:5:6};1);"АВЕКМНОРСТУХ")/(ДЛСТР(A1)<10))=6

Это 90 без "="

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Дата: Среда, 03.09.2014, 10:24 | Сообщение № 58

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

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

Сообщений: 2941

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

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

Долго мозолила глаза ДЛСТР, ведь здорово удлиняет, а работы - всего лишь проверить длину.
В итоге родилось

Сообщение отредактировал vikttur - Среда, 03.09.2014, 10:38

SkyPro

Дата: Среда, 03.09.2014, 10:36 | Сообщение № 59

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

Ранг: Старожил

Сообщений: 1206

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

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

2010

Цитата vikttur, 03.09.2014 в 10:24, в сообщении № 58

МУХСКОНВЕРТА

skypro1111@gmail.com

Дата: Среда, 03.09.2014, 10:47 | Сообщение № 60

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

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

Сообщений: 4517

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

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

Excel 2003

Виктор, СУППЕР!!!
Это ~~почти~~ твоя формула

Код

СЧЁТ(ПСТР(A1&0;{2;3;4;7;8;9};1)*НАЙТИ(ПСТР(A1;{1:5:6:10};1);"АВЕКМНОРСТУХ"))=24

79 без "="

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Сообщение отредактировал AlexM - Среда, 03.09.2014, 10:47