Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как поставить скобки в середине текста? - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как поставить скобки в середине текста? (Формулы/Formulas)
Как поставить скобки в середине текста?
alexyakim20 Дата: Вторник, 31.10.2017, 13:20 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Всем привет! есть текст "Свая железобетонная сечение 10000 х 400 х 400 С100.40-10.1У (серия 1.011.1-10, выпуск 1)" как сделать так: "Свая железобетонная сечение 10000 х 400 х 400 (С100.40-10.1У) (серия 1.011.1-10, выпуск 1)" может есть формулы? текста такого очень много и по каждому наименованию делать долго.
К сообщению приложен файл: 4403124.xlsx(8Kb)
 
Ответить
СообщениеВсем привет! есть текст "Свая железобетонная сечение 10000 х 400 х 400 С100.40-10.1У (серия 1.011.1-10, выпуск 1)" как сделать так: "Свая железобетонная сечение 10000 х 400 х 400 (С100.40-10.1У) (серия 1.011.1-10, выпуск 1)" может есть формулы? текста такого очень много и по каждому наименованию делать долго.

Автор - alexyakim20
Дата добавления - 31.10.2017 в 13:20
buchlotnik Дата: Вторник, 31.10.2017, 14:39 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3325
Репутация: 886 ±
Замечаний: 0% ±

2010, 2013, 2016 RUS / ENG
чисто по примеру - на регулярках[vba]
Код
Function рег_зам(t$, p$, r$, Optional g = True, Optional i = True)
    Application.Volatile
    With CreateObject("VBScript.RegExp")
        .Global = g
        .IgnoreCase = i
        .Pattern = p
       рег_зам= .Replace(t, r)
    End With
End Function
[/vba] с паттерном (С\d+[^\s]+) и заменой на ($1)
К сообщению приложен файл: 4403124-1-.xlsm(16Kb)


каждому For - Next!
платная помощь:
ЯД: 410012595572239
buchlotnik@mail.ru
 
Ответить
Сообщениечисто по примеру - на регулярках[vba]
Код
Function рег_зам(t$, p$, r$, Optional g = True, Optional i = True)
    Application.Volatile
    With CreateObject("VBScript.RegExp")
        .Global = g
        .IgnoreCase = i
        .Pattern = p
       рег_зам= .Replace(t, r)
    End With
End Function
[/vba] с паттерном (С\d+[^\s]+) и заменой на ($1)

Автор - buchlotnik
Дата добавления - 31.10.2017 в 14:39
Pelena Дата: Вторник, 31.10.2017, 15:05 | Сообщение № 3
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11755
Репутация: 2596 ±
Замечаний: 0% ±

Excel 2010, 2016 & Mac Excel
чисто по примеру
формулой
Код
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(A9;ПОИСК("(";A9)-1;;")");ПОИСК(" ";A9;ПОИСК(".*-";A9)-5)+1;;"(")
К сообщению приложен файл: 7206218.xlsx(10Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщение
чисто по примеру
формулой
Код
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(A9;ПОИСК("(";A9)-1;;")");ПОИСК(" ";A9;ПОИСК(".*-";A9)-5)+1;;"(")

Автор - Pelena
Дата добавления - 31.10.2017 в 15:05
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как поставить скобки в середине текста? (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!