Разложить многострочный текст в ячейке по строкам

Разложить многострочный текст в ячейке по строкам, каждая строка в свою ячейку

Пользователь

Сообщений: 3 Регистрация: 20.12.2013

20.12.2013 10:30:12

Всем добрый день!
Есть программа учета движения груза, в которой 2 раза в сутки формируется история следования груза (методом дописывания к тексту нового положения). Из программы производится выгрузка данных в Excel.
Для анализа и принятия мер есть необходимость многострочный текст в ячейке " история следования" разложить по строкам - каждая строка в свою ячейку. Каждая строка текста в ячейке " история следования" представляет собой - дата, время, ж.д.станция, и два символа - [10], [13]. Жесткий размер имеют только дата и время - остальное динамично.
Excel не совсем адекватно воспринимает выводимые символы - [10], [13]. Испробованные способы Левсимв, Правсимв, Поиск, Пстр, Длстр не помогают: прихватываются лишние символы с других строк.
Привожу пример. В примере: красным цветом - исходник, 2 варианта - желтый и зеленый.
Прошу помощи для решения этой проблемы формулами. Макросы, к сожалению, сложны для меня.

Прикрепленные файлы

ИсторияСледования.xls (27.5 КБ)

V Пользователь Сообщений: 5370 Регистрация: 22.12.2012	#2 20.12.2013 10:44:37 как должно выглядеть в конечном результате?

anvg

Пользователь

Сообщений: 11927 Регистрация: 22.12.2012

Excel 2016, 365

20.12.2013 10:47:30

Добрый день.
А зря, макросом для активной ячейки вполне себе коротко

Код
Public Sub SplitByDate() Dim sStrs() As String sStrs = Split(ActiveCell.Value, vbCrLf) If UBound(sStrs) > 0 Then ActiveCell.Offset(0, 1).Resize(1, UBound(sStrs) + 1).Value = sStrs End If End Sub

avto- Пользователь Сообщений: 3 Регистрация: 20.12.2013	#4 20.12.2013 11:38:01 В конечном результате д.б. - каждая строка в отдельной ячейке, соответствующей колонки (дате)

Владимир Пользователь Сообщений: 8196 Регистрация: 21.12.2012	#5 20.12.2013 11:53:37 Формат дат соблюдайте единым. Прикрепленные файлы ИсторияСледования.xlsx (10.71 КБ) "..Сладку ягоду рвали вместе, горьку ягоду я одна."

avto- Пользователь Сообщений: 3 Регистрация: 20.12.2013	#6 20.12.2013 12:03:13 Вау! Работает! Уточняющий вопрос - получилось множество? как распространить на другие ячейки - простым копированием? А если вытащить надо только текст (дата есть в заголовке столбца)?

Читают тему