Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Разделение в ячейке слитно написанного слова с цифрами, Excel разбивка ситнонаписанного
 
#1
31.08.2014 19:33:17
Доброго времени суток.
Уважаемые форумчане, подскажите пожалуйста, как вставить в слитнонаписанный текст с цифрами,
какой либо символ (между буквой и цифрой). Требуется для дальнейшего разбития ячеек.
Строчек много в ручную до Нового года буду делать.
Знаниями макросов не блещу,  готовое решение компенсирую.
 
 
 
#2
31.08.2014 19:42:01
=ЕСЛИОШИБКА(ДАТАЗНАЧ(ПСТР(C3;ПОИСК("??.??.????";C3);10));"")
Это дата. Если нужен отдельно текст:
=ПОДСТАВИТЬ(C3;D3;"тут_была_дата")
D3 - ячейка с датой

Поправка: если подставлять, то нужно, чтобы в D3 остался текст , без  преобразования в дату.
 
 
 
#3
31.08.2014 20:23:05
макрос, работает с выделенным диапазоном
Код
Sub t()
  Const s = " "
  Set re = CreateObject("vbscript.regexp")
  re.Pattern = "([а-яё])(?=\d)": re.Global = True: re.ignorecase = True
  For Each c In Selection.Cells: c.Value = re.Replace(c.Value, "$1" & s): Next
  re.Pattern = "(\d)(?=[а-яё])"
  For Each c In Selection.Cells: c.Value = re.Replace(c.Value, "$1" & s): Next
End Sub
Цитата
internet пишет: какой либо символ
задаётся константой s
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#4
31.08.2014 20:49:44
Формула массива (в одном месте врет):

Код
=ЕСЛИОШИБКА(ЛЕВСИМВ(C3;ПОИСКПОЗ(ИСТИНА;ЕЧИСЛО(--ПСТР(C3;СТРОКА(ДВССЫЛ("1:"&ДЛСТР(C3)));1));0)-1)&"-"&ПРАВСИМВ(C3;ДЛСТР(C3)-E3);C3)
Excel 2013
 
 
 
#5
01.09.2014 02:34:27
ikki, Самый  лучший фрилансер, которого я знаю. В остальном как договаривались.

Всем остальным отозвавшимся, тоже огромное спасибо за помощь !!!  
 
 
 
Страницы: 1
Наверх