Тонкости работы с переносами строк в Excel
Переносы строк внутри одной ячейки, добавляемые с помощью сочетания клавиш Alt+Enter - дело весьма частое и привычное. Иногда их делают сами пользователи, чтобы добавить красоты длинному тексту. Иногда такие переносы добавляются автоматически при выгрузке данных из каких-либо рабочих программ (привет 1С, SAP и т.д.) Проблема в том, что на такие таблицы приходится потом не просто любоваться, а с ними работать - и вот тогда эти невидимые символы переноса могут стать проблемой. А могут и не стать - если уметь правильно с ними обращаться.
Давайте-ка мы разберёмся в этом вопросе поподробнее.
Удаление переносов строк заменой
Если нам нужно избавиться от переносов, то первое, что обычно приходит в голову - это классическая техника "найти и заменить". Выделяем текст и затем вызываем окно замены сочетанием клавиш Ctrl+H или через Главная - Найти и выделить - Заменить (Home - Find&Select - Replace). Одна неувязочка - не очень понятно, как ввести в верхнее поле Найти (Find what) наш невидимый символ переноса строки. Alt+Enter тут, к сожалению, уже не работает, скопировать этот символ непосредственно из ячейки и вставить его сюда тоже не получается.
Поможет сочетание Ctrl+J - именно оно является альтернативой Alt+Enter в диалоговых окнах или полях ввода Excel:
Обратите внимание, что после того, как вы поставите мигающий курсор в верхнее поле и нажмёте Ctrl+J - в самом поле ничего не появится. Не пугайтесь - это нормально, символ-то невидимый :)
В нижнее поле Заменить (Replace with) либо ничего не вводим, либо вводим пробел (если хотим не просто удалить переносы, а заменить их на пробел, чтобы строки не склеились в единое целое). Останется нажать на кнопку Заменить всё (Replace All) и наши переносы исчезнут:
Нюанс: после выполнения замены введённый с помощью Ctrl+J невидимый символ остаётся в поле Найти и может помешать в дальнейшем - не забудьте его удалить, установив курсор в это поле и несколько раз (для надёжности) нажав на клавиши Delete и Backspace.
Удаление переносов строк формулой
Если нужно решить задачу именно формулами, то можно использовать встроенную функцию ПЕЧСИМВ (CLEAN), которая умеет очищать текст от всех непечатаемых символов, включая и наши злополучные переносы строк:
Такой вариант, однако, не всегда бывает удобен, т.к. строки после этой операции могут склеиваться между собой. Чтобы этого не происходило, нужно не просто удалять символ переноса, а заменять его на пробел (см. следующий пункт).
Замена переносов строк формулой
А если хочется не просто удалить, а именно заменить Alt+Enter на, например, пробел, то потребуется уже другая, чуть более сложная конструкция:
Чтобы задать невидимый символ переноса мы используем функцию СИМВОЛ (CHAR), которая выводит символ по его коду (10). А потом функция ПОДСТАВИТЬ (SUBSTITUTE) ищет в исходных данных наши переносы и заменяет их на любой другой текст, например, на пробел.
Деление на столбцы по переносу строки
Знакомый многим и очень удобный инструмент Текст по столбцам с вкладки Данные (Data - Text to Columns) тоже может замечательно работать с переносами строк и разделить текст из одной ячейки на несколько, разбив его по Alt+Enter. Для этого на втором шаге мастера нужно выбрать вариант пользовательского символа-разделителя Другой (Custom) и использовать уже знакомое нам сочетание клавиш Ctrl+J как альтернативу Alt+Enter:
Если в ваших данных может встречаться несколько переносов строк подряд, то можно их "схлопнуть", включив флажок Считать последовательные разделители одним (Treat consecutive delimiters as one).
После нажатия на Далее (Next) и прохождения всех трёх шагов мастера мы получим желаемый результат:
Обратите внимание, что до выполнения этой операции необходимо вставить справа от разделяемого столбца достаточное количество пустых колонок, чтобы образовавшийся текст не затёр те значения (цены), которые были справа.
Деление на строки по Alt+Enter через Power Query
Ещё одной любопытной задачей является деление многострочного текста из каждой ячейки не на столбцы, а на строки:
Вручную такое делать долго, формулами - сложно, макросом - не каждый напишет. А на практике подобная задача встречается чаще, чем хотелось бы. Самым простым и лёгким решением будет использовать для этой задачи возможности надстройки Power Query, которая встроена в Excel начиная с 2016 года, а для более ранних версий 2010-2013 её можно совершенно бесплатно скачать с сайта Microsoft.
Чтобы загрузить исходные данные в Power Query их нужно сначала преобразовать в "умную таблицу" сочетанием клавиш Ctrl+T или кнопкой Форматировать как таблицу на вкладке Главная (Home - Format as Table). Если по каким-то причинам вы не хотите или не можете использовать "умные таблицы", то можно работать и с "глупыми". В этом случае просто выделите исходный диапазон и дайте ему имя на вкладке Формулы - Диспетчер имен - Создать (Formulas - Name Manager - New).
После этого на вкладке Данные (если у вас Excel 2016 или новее) или на вкладке Power Query (если у вас Excel 2010-2013) можно жать на кнопку Из таблицы / диапазона (From Table/Range), чтобы загрузить нашу таблицу в редактор Power Query:
После загрузки выделим столбец с многострочным текстом в ячейках и выберем на Главной вкладке команду Разделить столбец - По разделителю (Home - Split Column - By delimiter):
Скорее всего, Power Query автоматически распознает принцип деления и сам подставит условное обозначение #(lf) невидимого символа переноса строки (lf = line feed = перенос строки) в поле ввода разделителя. Если нужно, то другие символы можно выбрать из выпадающего списка в нижней части окна, если включить предварительно галочку Разделить с помощью специальных символов (Split by special characters).
Чтобы всё разделилось на строки, а не не столбцы - не забудьте переключить селектор Строки (By rows) в группе расширенных параметров.
Останется только нажать на ОК и получить желаемое:
Готовую таблицу можно выгрузить обратно на лист с помощью команды Закрыть и загрузить - Закрыть и загрузить в... на вкладке Главная (Home - Close&Load - Close&Load to...).
Важно отметить, что при использовании Power Query необходимо помнить о том, что при изменении исходных данных результаты автоматически не обновляются, т.к. это не формулы. Для обновления нужно обязательно щёлкнуть правой кнопкой мыши по итоговой таблице на листе и выбрать команду Обновить (Refresh) или нажать кнопку Обновить всё на вкладке Данные (Data - Refresh All).
Макрос для деления на строки по Alt+Enter
Для полноты картины давайте упомянем решение предыдущей задачи ещё и с помощью макроса. Откройте редактор Visual Basic с помощью одноимённой кнопки на вкладке Разрабочик (Developer) или сочетания клавиш Alt+F11. В появившемся окне вставьте новый модуль через меню Insert - Module и скопируйте туда нижеприведённый код:
Sub Split_By_Rows()
Dim cell As Range, n As Integer
Set cell = ActiveCell
For i = 1 To Selection.Rows.Count
ar = Split(cell, Chr(10)) 'делим текст по переносам в массив
n = UBound(ar) 'определяем кол-во фрагментов
cell.Offset(1, 0).Resize(n, 1).EntireRow.Insert 'вставляем пустые строки ниже
cell.Resize(n + 1, 1) = WorksheetFunction.Transpose(ar) 'вводим в них данные из массива
Set cell = cell.Offset(n + 1, 0) 'сдвигаемся на следующую ячейку
Next i
End Sub
Вернитесь в Excel и выделите ячейки с многострочным текстом, который надо разделить. Затем воспользуйтесь кнопкой Макросы на вкладке Разработчик (Developer - Macros) или сочетанием клавиш Alt+F8, чтобы запустить созданный макрос, который и проделает за вас всю работу:
Вуаля! Программисты - это, на самом деле, просто очень ленивые люди, которые лучше один раз как следует напрягутся, чтобы потом ничего не делать :)
Ссылки по теме
- Зачистка текста от мусора и лишних символов
- Замена текста и зачистка от неразрывных пробелов функцией ПОДСТАВИТЬ
- Как разделить слипшийся текст на части в Excel
(Я диск).
Зажимаете Alt, затем на цифровой клавиатуре поочередно вводите нужные цифры: 0-1-6-0
Это коды ASCII. Например, Ctrl+J можно заменить на Alt+0010
Подскажите, как можно привязать информацию при разбивке к новой строке?
В Вашем последнем примере (макрос), при разбивке на строки сумм, имена менеджеров остаются только в первой строке. Можно ли их привязать к суммам и при разбивке ячейки на строки они будут подвязаны к новой строке?
Иван 54122
Иван 23213
Иван 5540 итд.
С помощью параметров разбивки на страницы можно определить, куда будут вставляться автоматические разрыв страницы, или переопределить их.
Важно: Описанные ниже процедуры должны выполняться в режиме разметки. Если используется другой режим, в меню Вид выберите пункт Разметка страницы.
Выполните одно из указанных ниже действий.
Не разрывать абзац
Можно сделать так, чтобы все строки абзаца находились на одной странице или в одной колонке. Благодаря этому абзац не будет разрываться между двумя страницами.
Не отрывать от следующегоВыделите строки, которые должны находиться вместе.
В меню Формат выберите пункт Абзац и откройте вкладку Положение на странице.
Установите флажок Не разрывать абзац.
Можно сделать так, чтобы абзацы, например заголовок и последующий абзац, выводились на одной странице или в одной колонке.
Принудительное добавление разрыва страницы перед абзацемВыделите абзацы, которые нужно расположить на одной странице.
В меню Формат выберите пункт Абзац и откройте вкладку Положение на странице.
Установите флажок Не отрывать от следующего.
Если нужно, чтобы абзац всегда выводился вверху страницы, добавьте перед ним разрыв страницы.
У нас в офисе часто приходится обновлять софт, ввиду новых поисковых алгоритмов. Но без настроек не всегда получается полноценная работа. Но толковый сисадмин в офисе - это залог успеха.Выделите абзац, перед которым нужно вставить разрыв страницы.
В меню Формат выберите пункт Абзац и откройте вкладку Положение на странице.
Установите флажок С новой страницы.
И еще с этой функцией не всегда лады бывают. Но решается просто
Запрет висячих строк
По умолчанию в Word последняя строка абзаца не может выводиться вверху или внизу страницы.
Запрет переноса строк таблицы на следующую страницуВыделите абзацы, в которых нужно запретить висячая строка.
В меню Формат выберите пункт Абзац и откройте вкладку Положение на странице.
Установите флажок Запрет висячих строк.
Щелкните таблицу.
В меню Таблица выберите команду Свойства таблицы, а затем откройте вкладку Строка.
Снимите флажок Разрешить перенос строк на следующую страницу.
Большое спасибо за очень подробную статью. В большинстве таблиц очень помогло, но возникла проблема с обработкой в PowerQuerry данных из 1С.
В рамках одной таблицы, когда один столбец разделял на несколько по пользовательскому критерию #(lf), то в отношении одного из столбцов данный подход не сработал. В ячейках этого проблемного столбца все строчки с переносами, но никакими знаками данные переносы почем у-то не идентифицируются.
Вы случайно не знакомы с данной проблемой? Это может еще какой-то способ переноса, кроме #(lf)?
Ни кто не нашел ответа на данный вопрос?
Например имеется 5 ячеек с данными. в первых двух имеется перенос, в третьей нету переноса в 4 и 5 снова перенос. При выделении всех 5 ячеек макрос выдает ошибку и делает работу до 3 ячейки. Тоесть он прерывается если нету переноса. можно это как то обойти ?
Подскажите как через VBA удалять только последний Символ(10)?
Как всегда огромное спасибо за шикарный урок для малограмотных типа меня!
Подскажите пожалуйста как можно решать задачу наоборот, сложить слова с переводом строки?
Был ли у Вас такой ролик или чонить подобное?
Еще раз огромное спасибо за Ваши праведные труды!
Не могу победить этот перенос строки в power query. Он упорно не хочет его видеть, плюс почему-то меню разделения по столбцам у меня не такое расширенное, как у автора и предлагает в пользовательском разделителе только кол-во столбцов. Просто замена символа на #(lf) на другой, тоже ни к чему не привела.
В обычной умной таблице все получается легко, но хотелось форматировать выгрузку полностью в query/
Подскажите что не так. Спасибо
Проблему с расширенными настройками решил, обновил эксель. После этого сразу все заработало.