Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Формула, оставляющая только текст из последних скобок.
 
Добрый день, форумчане.
Помогите, пожалуйста, составить формулу, которая должна из всего текста в ячейке оставлять только текст из последних скобок.
Например, из "орл(олр)ор(оло)(4.6)тр(34ловіс)" остаться должно только "34ловіс".
 
UDF
Код
Function Ckobki(cell As Range) As String
    Ckobki = Left(Split(cell, "(")(UBound(Split(cell, "("))), Len(Split(cell, "(")(UBound(Split(cell, "(")))) - 1)
End Function
 
Kuzmich, спасибо, но мне нужна именно формула для протяжки. Не код.
 
iNic, вставьте данный код в стандартный модуль VBA и в списке пользовательских функций появится функция Ckobki, которую можно протягивать гуда угодно
Согласие есть продукт при полном непротивлении сторон.
 
Kuzmich, Sanja, спасибо большое. Работает как надо.
 
ну как-то ничего лучше не придумалось:
Код
=ЛЕВСИМВ(ЗАМЕНИТЬ(A1;1;ПОИСК("|";ПОДСТАВИТЬ(A1;"(";"|";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;"(";"")))););ПОИСК(")";ЗАМЕНИТЬ(A1;1;ПОИСК("|";ПОДСТАВИТЬ(A1;"(";"|";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;"(";""))));))-1)

при условии, что последняя открывающая скобка имеет соответственно закрывающую.
F1 творит чудеса
 
=ПОДСТАВИТЬ(ПРАВБ(ПОДСТАВИТЬ(C5;"(";ПОВТОР(")";50));50);")";)
Страницы: 1
Читают тему (гостей: 1)