Страницы: 1
RSS
Вставка символов между цифрами
 
Есть порядка 40 000 сток с цифрами нужно в них вставить тире и две последние цифры отделить пробелом.

Например:
12345678910
в итоге должно получиться 123-456-789 10
Пробовал через
Код
=СЦЕПИТЬ(ПСТР(А1);3;3);" ";ПСТР(А4;6;3);;" ";ПСТР(А4;9;3);ПСТР(А4);2))  
но не много не то, как придумать под мой запрос не как не придет в голову.

Спасибо заранее.
 
kiril14, файл пример гдЭ?
Код
=ПСТР(A1;1;3)&"-"&ПСТР(A1;4;3)&"-"&ПСТР(A1;7;3)&" "&ПРАВСИМВ(A1;2)
Изменено: Mershik - 26.02.2020 20:26:58
Не бойтесь совершенства. Вам его не достичь.
 
Благодарю все получилось!
 
kiril14, но быстрее макросом
Код
Sub formaat()
Dim i As Double
    ilastrow = Cells(Rows.Count, 1).End(xlUp).Row
    For i = 1 To ilastrow
    a = Format(Cells(i, 1), "###-###-### ##")
    Cells(i, 1) = a
    
Next i
End Sub
Изменено: Mershik - 26.02.2020 20:41:38
Не бойтесь совершенства. Вам его не достичь.
 
=ТЕКСТ(A1;"000-000-000 \ 00")
 
RAN,  Андрей, это кто ж последовательность цифр числом считает?  :D
По вопросам из тем форума, личку не читаю.
Страницы: 1
Наверх