Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Поменять местами знаки в ячейке, не могу решить как поменять местами знаки
 
Доброго времени суток, не могу решить как поменять местами знаки в ячейке
Имеем:
Aegis 1003RH (13)
Aegis 2004 (13)
Aegis 2506 (13)
Aegis 2506H (13)
Caldia  2004 (09)
Caldia  2506 (09)
 
необходимо поменять на:
Aegis (13) 1003RH  
 
Для такого примера можно так
=ЛЕВСИМВ(A1;ПОИСК(" ";A1)-1)&ПРАВСИМВ(A1;5)&" "&ПСТР(A1;ПОИСК(" ";A1)+1;ПОИСК("(";A1)-ПОИСК(" ";A1)-2)
Согласие есть продукт при полном непротивлении сторон.
 
Спасибо Sanja помогло, сам бы не разобрался , попробую проанализировать формулу, для дальнейшего понимания. Большое спасибо!
 
еще вариант:
=ЛЕВБ(ПОДСТАВИТЬ(A1;" ";ПРАВБ(A1;5)&" ");ДЛСТР(A1))
 
Catboyun не очень корректно получается.
Типа того: Caldia(11)  (11)  
Изменено: huchos - 21 Фев 2017 20:44:16
 
добрый вечер,вариант функции uuu в столбце C и функции vvv
Код
Function vvv$(t$)
  Dim x: x = Split(t)
x(0) = x(0) & x(UBound(x)): x(UBound(x)) = ""
 vvv = Join(x)
End Function
 
Код
Function uuu$(t$)
  Dim x: x = Split(t)
x(0) = x(0) & x(UBound(x)): x(2) = "": x(1) = Chr(32) & x(1)
  uuu = Join(x)
End Function
Изменено: sv2013 - 21 Фев 2017 22:24:13
 
sv2013 Спасибо и Вам, только тоже не очень корректно, в некоторых позициях: Caldia(11) 2000U  (11)
 
Цитата
huchos написал:
не очень корректно
ну делал по вашему примеру.
=ЛЕВБ(ПОДСТАВИТЬ(A1;" ";" "&СЖПРОБЕЛЫ(ПРАВБ(ПОДСТАВИТЬ(A1;" ";ПОВТОР(" ";15));15))&" ");ДЛСТР(A1))
Цитата
huchos написал:
Caldia(11)  (11
вероятно лишний пробел
 
Формула от Sanja - безошибочна !  :)
 
Catboyun, да скорее всего так и есть. Спасибо.
Страницы: 1
Читают тему (гостей: 1)