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

Дата: Вторник, 12.02.2019, 15:13 | Сообщение № 1

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

Ранг: Новичок

Сообщений: 17

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

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

Excel 2016

Добрый день! Суть вопроса:
Существует ячейка A1 в которой находится текст - абаывфывыя07Март2004.xlsm
Нужно:

В ячейку A2 (Имя) поместить - абаывфывыя (С условием что длина этого текста будет заканчиваться перед первой попавшейся цифрой)
В ячейку А3 (День) поместить - 07 (С условием что перед 0 не стоит цифра и что после 7 не стоит цифра, иначе путается с текстом 2004)
В ячейку А4 (Месяц) поместить Март (РЕШЕНО)
В ячейку А5 (Год) поместить 2004 (РЕШЕНО)
В ячейку А6 (Формат) поместить .xlsm (РЕШЕНО)

Проблема только с Именем и Днем.

Решение для Месяца, года и формата следующее:

Код

=ЕСЛИ(ЕОШ(ПОИСК("Январь";A27));"";"Январь ") На примере месяца.

Сообщение отредактировал Jelvis - Вторник, 12.02.2019, 15:36

Дата: Вторник, 12.02.2019, 15:15 | Сообщение № 2

Группа: Модераторы

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

Сообщений: 7015

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

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

Excel 2007;2010;2016

Jelvis, оформите ваш пост в соответствии с Правилами форума в части использования тэгов. пояснялка тут

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Дата: Вторник, 12.02.2019, 15:31 | Сообщение № 3

Группа: Модераторы

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

Сообщений: 7015

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

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

Excel 2007;2010;2016

для имени. формула массива

Код

=ПСТР(A1;1;ПОИСКПОЗ(1=1;ЕЧИСЛО(--ПСТР(A1;СТРОКА($1:$100);1));0)-1)

для даты. формула массива

Код

=ПСТР(A1;ПОИСКПОЗ(1=1;ЕЧИСЛО(--ПСТР(A1;СТРОКА($1:$100);1));0);2)

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

vikttur

Дата: Вторник, 12.02.2019, 15:34 | Сообщение № 4

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

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

Сообщений: 2941

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

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

Цитата китин, 12.02.2019 в 15:15, в сообщении № 2 ()

оформите ваш пост в соответствии с Правилами форума в части использования тэгов.

Это совершенно не означает, что текст нужно делать попугаистым. Говорилось о формуле

Дата: Вторник, 12.02.2019, 15:34 | Сообщение № 5

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

Ранг: Новичок

Сообщений: 17

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

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

Excel 2016

Подскажите пожалуйста, а как понять в этой формуле что за что отвечает. Понимаю что в ячейке A1 идет поиск цифры или как понять?

Сообщение отредактировал Jelvis - Вторник, 12.02.2019, 15:38

Дата: Вторник, 12.02.2019, 15:36 | Сообщение № 6

Группа: Модераторы

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

Сообщений: 7015

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

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

Excel 2007;2010;2016

Jelvis, я вам щаз точно замечание влуплю. почитайте п5j Правил форума.
кнопка цитата не для ответа

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Дата: Вторник, 12.02.2019, 15:40 | Сообщение № 7

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

Ранг: Новичок

Сообщений: 17

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

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

Excel 2016

китин, Исправил. Извините, спешу просто.

Сообщение отредактировал Jelvis - Вторник, 12.02.2019, 15:40

Дата: Вторник, 12.02.2019, 15:44 | Сообщение № 8

Группа: Модераторы

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

Сообщений: 7015

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

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

Excel 2007;2010;2016

из меня объясняльшик плохой

я объясняю, но почему то никто не понимает

смотрите файл. выделяйте непонятный кусок формулы и нажимайте кнопку F9 . и увидите результат действия этого куска формулы

К сообщению приложен файл: Jelvis.xlsx (21.7 Kb)

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Дата: Вторник, 12.02.2019, 15:49 | Сообщение № 9

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

Ранг: Новичок

Сообщений: 17

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

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

Excel 2016

китин, Спасибо. буду думать, не получается почему-то. Убираются скобки и пишет Н/Д. Ставлю скобки, в ячейку выпадает что-то типо ЧИСЛО-...
Спасибо большое.

Дата: Вторник, 12.02.2019, 15:54 | Сообщение № 10

Группа: Модераторы

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

Сообщений: 7015

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

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

Excel 2007;2010;2016

Jelvis, я же вам написал: формула массива . водится одновременным нажатием ТРЕХ клавиш: Ctrl+Shift+Enter

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Дата: Вторник, 12.02.2019, 16:01 | Сообщение № 11

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

Ранг: Новичок

Сообщений: 17

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

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

Excel 2016

китин, Боже, какой я тупой) Объединил ячейки и ошибка формулы писало...Спасибо огромное, решили мои проблемы)

sboy

Дата: Вторник, 12.02.2019, 16:58 | Сообщение № 12

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

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

Сообщений: 2566

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

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

Excel 2010

Добрый день.
Вариант одной пользовательской функцией разобрать на составные части
[vba]

Код

Function Jelvis(t As String, c As Integer)
With CreateObject("VBScript.RegExp"): .Global = True: .Pattern = "\D+|\d+": Jelvis = .Execute(t)(c): End With
End Function

[/vba]

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

Яндекс: 410016850021169