Alllisan
Дата: Понедельник, 05.11.2018, 12:04 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2010
Здравствуйте всем, прошу помочь с формулой, понимаю, что нужно использовать ПСТР и ПОИСК, но не могу их увязать между собой. Мне нужно из ячейки вытащить в отдельную ячейку все, что касается срока действия тарифа. Ячейки: Смена тарифа. Доплата за новый тариф Тариф 1, до 250 ЛС, сроком действия 3 мес. Тариф 1, до 100 ЛС, сроком действия 12 мес. Тариф 1, до 1000 ЛС, сроком действия 12 мес. Дополнительная организация, до 100 ЛС, сроком действия 3 мес. Тариф 11, срок действия 3 мес. Тариф 7+, срок действия 12 мес.
Здравствуйте всем, прошу помочь с формулой, понимаю, что нужно использовать ПСТР и ПОИСК, но не могу их увязать между собой. Мне нужно из ячейки вытащить в отдельную ячейку все, что касается срока действия тарифа. Ячейки: Смена тарифа. Доплата за новый тариф Тариф 1, до 250 ЛС, сроком действия 3 мес. Тариф 1, до 100 ЛС, сроком действия 12 мес. Тариф 1, до 1000 ЛС, сроком действия 12 мес. Дополнительная организация, до 100 ЛС, сроком действия 3 мес. Тариф 11, срок действия 3 мес. Тариф 7+, срок действия 12 мес. Alllisan
Сообщение отредактировал Alllisan - Понедельник, 05.11.2018, 12:17
Ответить
Сообщение Здравствуйте всем, прошу помочь с формулой, понимаю, что нужно использовать ПСТР и ПОИСК, но не могу их увязать между собой. Мне нужно из ячейки вытащить в отдельную ячейку все, что касается срока действия тарифа. Ячейки: Смена тарифа. Доплата за новый тариф Тариф 1, до 250 ЛС, сроком действия 3 мес. Тариф 1, до 100 ЛС, сроком действия 12 мес. Тариф 1, до 1000 ЛС, сроком действия 12 мес. Дополнительная организация, до 100 ЛС, сроком действия 3 мес. Тариф 11, срок действия 3 мес. Тариф 7+, срок действия 12 мес. Автор - Alllisan Дата добавления - 05.11.2018 в 12:04
AlexM
Дата: Понедельник, 05.11.2018, 12:08 |
Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4491
Репутация:
1115
±
Замечаний:
0% ±
Excel 2003
Функцией отделите 7 правых символов. PS. прочтите правила форума.
Функцией отделите 7 правых символов. PS. прочтите правила форума. AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Ответить
Сообщение Функцией отделите 7 правых символов. PS. прочтите правила форума. Автор - AlexM Дата добавления - 05.11.2018 в 12:08
Alllisan
Дата: Понедельник, 05.11.2018, 12:17 |
Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2010
AlexM, там не везде "мес" стоит в конце.
AlexM, там не везде "мес" стоит в конце. Alllisan
Ответить
Сообщение AlexM, там не везде "мес" стоит в конце. Автор - Alllisan Дата добавления - 05.11.2018 в 12:17
Pelena
Дата: Понедельник, 05.11.2018, 12:33 |
Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 19184
Репутация:
4420
±
Замечаний:
±
Excel 365 & Mac Excel
Так надо только число или слово мес тоже? По примеру можно такКод
=ПСТР(A2;ПОИСК("действия";A2)+9;ПОИСК(" ";A2;ПОИСК("действия";A2)+9)-ПОИСК("действия";A2)-5)
Так надо только число или слово мес тоже? По примеру можно такКод
=ПСТР(A2;ПОИСК("действия";A2)+9;ПОИСК(" ";A2;ПОИСК("действия";A2)+9)-ПОИСК("действия";A2)-5)
Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Так надо только число или слово мес тоже? По примеру можно такКод
=ПСТР(A2;ПОИСК("действия";A2)+9;ПОИСК(" ";A2;ПОИСК("действия";A2)+9)-ПОИСК("действия";A2)-5)
Автор - Pelena Дата добавления - 05.11.2018 в 12:33
bmv98rus
Дата: Понедельник, 05.11.2018, 12:49 |
Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4107
Репутация:
768
±
Замечаний:
0% ±
Excel 2013/2016
Код
=TRIM(RIGHT(SUBSTITUTE(LEFT(A2;FIND(" мес";A2)+3);" ";REPT(" ";99));198))
Код
=TRIM(RIGHT(SUBSTITUTE(LEFT(A2;FIND(" мес";A2)+3);" ";REPT(" ";99));198))
bmv98rus
Замечательный Временно просто медведь , процентов на 20 .
Ответить
Сообщение Код
=TRIM(RIGHT(SUBSTITUTE(LEFT(A2;FIND(" мес";A2)+3);" ";REPT(" ";99));198))
Автор - bmv98rus Дата добавления - 05.11.2018 в 12:49
Alllisan
Дата: Понедельник, 05.11.2018, 16:51 |
Сообщение № 6
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2010
Pelena, очень круто, спасибо. Много лет сталкиваюсь с готовыми формулами ПСТР, но никак не могу понять, как они работают ((
Pelena, очень круто, спасибо. Много лет сталкиваюсь с готовыми формулами ПСТР, но никак не могу понять, как они работают (( Alllisan
Ответить
Сообщение Pelena, очень круто, спасибо. Много лет сталкиваюсь с готовыми формулами ПСТР, но никак не могу понять, как они работают (( Автор - Alllisan Дата добавления - 05.11.2018 в 16:51
Alllisan
Дата: Понедельник, 05.11.2018, 16:51 |
Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2010
bmv98rus, спасибо большое!!!
Ответить
Сообщение bmv98rus, спасибо большое!!! Автор - Alllisan Дата добавления - 05.11.2018 в 16:51
AlexM
Дата: Понедельник, 05.11.2018, 20:39 |
Сообщение № 8
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4491
Репутация:
1115
±
Замечаний:
0% ±
Excel 2003
не везде "мес" стоит в конце.
тогда такКод
=СЖПРОБЕЛЫ(ПСТР(ПРАВБ(A1;9);ПОИСК(" ";ПРАВБ(A1;9));99))
или такКод
=ТЕКСТ(--ПСТР(ПРАВБ(A1;9);ПОИСК(" ";ПРАВБ(A1;9));3);"0\ \ме\с")
PS. Не понял поправку о мес в конце, не посмотрев пример. :-(
не везде "мес" стоит в конце.
тогда такКод
=СЖПРОБЕЛЫ(ПСТР(ПРАВБ(A1;9);ПОИСК(" ";ПРАВБ(A1;9));99))
или такКод
=ТЕКСТ(--ПСТР(ПРАВБ(A1;9);ПОИСК(" ";ПРАВБ(A1;9));3);"0\ \ме\с")
PS. Не понял поправку о мес в конце, не посмотрев пример. :-(AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Сообщение отредактировал AlexM - Понедельник, 05.11.2018, 20:48
Ответить
Сообщение не везде "мес" стоит в конце.
тогда такКод
=СЖПРОБЕЛЫ(ПСТР(ПРАВБ(A1;9);ПОИСК(" ";ПРАВБ(A1;9));99))
или такКод
=ТЕКСТ(--ПСТР(ПРАВБ(A1;9);ПОИСК(" ";ПРАВБ(A1;9));3);"0\ \ме\с")
PS. Не понял поправку о мес в конце, не посмотрев пример. :-(Автор - AlexM Дата добавления - 05.11.2018 в 20:39
AlexM
Дата: Понедельник, 05.11.2018, 20:53 |
Сообщение № 9
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4491
Репутация:
1115
±
Замечаний:
0% ±
Excel 2003
Исправил формулуКод
=ТЕКСТ(--ПСТР(A2;ПОИСК(" мес";A2)-2;2);"0\ \ме\с")
илиКод
=--ПСТР(A2;ПОИСК(" мес";A2)-2;2)&" мес"
Исправил формулуКод
=ТЕКСТ(--ПСТР(A2;ПОИСК(" мес";A2)-2;2);"0\ \ме\с")
илиКод
=--ПСТР(A2;ПОИСК(" мес";A2)-2;2)&" мес"
AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Сообщение отредактировал AlexM - Понедельник, 05.11.2018, 22:30
Ответить
Сообщение Исправил формулуКод
=ТЕКСТ(--ПСТР(A2;ПОИСК(" мес";A2)-2;2);"0\ \ме\с")
илиКод
=--ПСТР(A2;ПОИСК(" мес";A2)-2;2)&" мес"
Автор - AlexM Дата добавления - 05.11.2018 в 20:53
sv2014
Дата: Вторник, 06.11.2018, 22:39 |
Сообщение № 10
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация:
61
±
Замечаний:
0% ±
Excel 2013
Alllisan , вариант UDF в столбце B [vba]Код
Function uuu(t$) With CreateObject("VBScript.RegExp"): .Pattern = "сроком действия \d+(?: мес)?" uuu = Mid(.Execute(t)(0), 17) End With End Function
[/vba]
Alllisan , вариант UDF в столбце B [vba]Код
Function uuu(t$) With CreateObject("VBScript.RegExp"): .Pattern = "сроком действия \d+(?: мес)?" uuu = Mid(.Execute(t)(0), 17) End With End Function
[/vba]sv2014
Ответить
Сообщение Alllisan , вариант UDF в столбце B [vba]Код
Function uuu(t$) With CreateObject("VBScript.RegExp"): .Pattern = "сроком действия \d+(?: мес)?" uuu = Mid(.Execute(t)(0), 17) End With End Function
[/vba]Автор - sv2014 Дата добавления - 06.11.2018 в 22:39