Excel как убрать перевод строки

Skip to content

4 способа быстро убрать перенос строки в ячейках Excel

В этом совете вы найдете 4 совета для удаления символа переноса строки из ячеек Excel. Вы также узнаете, как заменять разрывы строк другими символами. Все решения работают с Excel 2019, 2016, 2013 и более ранними версиями.

Перенос строки в вашем тексте внутри ячейки Excel может возникнуть разными способами. Обычно он появляется, когда вы копируете текст с веб-страницы или из Word, получаете файл, который уже содержит разрывы строк, от коллеги или клиента. Или вы добавляете его самостоятельно, используя комбинацию Alt + Enter.

В любом случае, вы можете решить убрать перенос строки из ваших ячеек, поскольку он не позволяет найти нужную фразу или же заставляет содержимое столбца выглядеть неаккуратно, когда вы включаете опцию переноса текста. Если вы решите загрузить ваши данные в файл .csv для использования в других программах, то в итоге у вас одна ячейка с переносами строк превратится в несколько. Конечно, это нарушит структуру ваших данных.

Все эти 4 способа, которые мы вам предлагаем, действительно быстрые. Выберите тот, который вам больше всего подходит:

  • Как убрать перенос строки при помощи «Найти и заменить».
  • 3 формулы, чтобы удалить переносы строк в ячейках.
  • Как можно использовать макрос VBA.
  • Удаляем перенос строки с помощью надстройки Ultimate Suite

Примечание. Первоначально термины «возврат каретки» и «перевод строки» использовались в пишущей машинке и означали два различных действия.

Компьютеры и программное обеспечение для обработки текстов создавались с учетом специфики пишущей машинки. Вот почему теперь для обозначения переноса строки используются два разных непечатаемых символа: «Возврат каретки» (CR, код ASCII 13) и «Перевод строки» (LF, код ASCII 10). 

Имейте в виду, что в Excel вы можете найти оба варианта. Если вы импортируете данные из файла .txt или .csv, вы с большей вероятностью найдете комбинацию возврат каретки + перевод строки. Когда вы разбиваете текст в ячейке, используя Alt + Enter, то Excel вставляет только перевод строки. Если вы получите файлы .csv от человека, который использует Linux или Unix, то там также найдете только перевод строки.

Удаление вручную. 

Плюсы: самый быстрый способ.

Минусы: никаких дополнительных возможностей.

Итак, воспользуемся помощью стандартной функции «Найти и заменить»:

избавиться от переводов строки при помощи инструмента Найти и заменить

  1. Выделите все позиции, которые вы хотите обработать.
  2. Нажмите Ctrl + H, чтобы открыть диалоговое окно «Найти и заменить».
  3. В поле » Найти» введите Ctrl + J. Оно будет выглядеть пустым, но вы увидите крошечную точку.
  4. В поле «Заменить на» введите любое значение для замены. Обычно это пробел, чтобы избежать случайного «слипания» двух слов. Если вам нужно просто удалить разрывы строк, оставьте поле пустым.
  5. Нажимаем кнопку «Заменить все» и наслаждаемся результатом!

Удалите разрывы строк с помощью формул Excel.

Плюсы: вы можете использовать вложенные формулы для более сложной обработки текста в ячейках. Например, можно удалить символы перевода строки, а затем удалить лишние начальные и конечные пробелы, а также пробелы между словами.

Или вам может потребоваться удалить перевод строки, чтобы использовать ваш текст в качестве аргумента другой функции без изменения исходных ячеек. Например, если вы хотите использовать результат в качестве аргумента функции ВПР.

Минусы: вам нужно создать вспомогательный столбец и выполнить некоторое количество дополнительных действий.

  1. Добавьте вспомогательный столбец в конец ваших данных. Вы можете назвать его «В одну строку».
  2. В первой его позиции (C2) введите формулу для удаления или замены переносов строк. Здесь мы представим вам несколько полезных формул для разных случаев:

Удаление возврата каретки и перевода строки как в Windows, так и в UNIX.

=ПОДСТАВИТЬ(ПОДСТАВИТЬ(A2;СИМВОЛ(13);»»);СИМВОЛ(10);»»)

Заменяем перенос строки любым другим символом (например, запятая + пробел). В этом случае строки не будут «слипаться» и лишние пробелы не появятся.

=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A3;СИМВОЛ(13);», «);СИМВОЛ(10);», «))

Или же можно обойтись и без запятой, просто заменив пробелом:

=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A3;СИМВОЛ(13);» «);СИМВОЛ(10);» «))

Если вы хотите удалить из текста все непечатаемые символы, включая в том числе и переносы строк:

=ПЕЧСИМВ(A4)

как удалить перевод строки в ячейке при помощи формулы Excel

Как видите, не всегда результат выглядит красиво и аккуратно. В зависимости от исходных данных выбирайте наиболее подходящий для вас вариант.

При желании вы можете заменить исходный столбец на тот, в котором были удалены переносы строк:

  1. Выделите все данные в столбце В и нажмите Ctrl + C, чтобы скопировать данные в буфер обмена.
  2. Теперь выберите А2 и нажмите Shift + F10 + V.
  3. Удалите вспомогательный столбец В.

Макрос VBA для замены переноса строки на пробел.

Плюсы: создав один раз, макрос можно повторно использовать в любой книге, поместив его в персональную книгу макросов.

Минусы: желательно иметь базовые знания VBA. Или воспользуйтесь нашей подробной инструкцией.

Макрос VBA из приведенного ниже примера заменяет на пробел символ возврата каретки из всех ячеек на текущем активном листе.

Sub RemoveCarriageReturns()
Dim MyRange As Range
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each MyRange In ActiveSheet.UsedRange
If 0 < InStr(MyRange, Chr(10)) Then
MyRange = Replace(MyRange, Chr(10), » «)
End If
Next
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub

Если вы не очень хорошо знаете VBA, просто следуйте рекомендациям ниже:

  1. Нажмите Alt + F11, чтобы открыть редактор Visual Basic.
  2. Щелкните правой кнопкой мыши имя книги на панели «Project — VBAProject » (в верхнем левом углу окна редактора) и выберите «Вставить» -> «Модуль» в контекстном меню.
  3. Скопируйте код VBA и вставьте его в правую панель редактора VBA ( окно « Module1 »).
  4. Сохраните книгу как «книгу Excel с поддержкой макросов».
    Нажмите Crl + S, затем нажмите кнопку «Нет» в диалоговом окне предупреждения «Следующие функции не могут быть сохранены в книге без макросов».
  5. Откроется диалоговое окно «Сохранить как». Выберите «Книга Excel с поддержкой макросов» из раскрывающегося списка «Тип файла». Нажмите кнопку «Сохранить».
  6. Нажмите Alt + Q , чтобы закрыть окно редактора и вернуться к своей книге.
  7. Если вы хотите запустить код VBA, который вы добавили, как описано в разделе выше: нажмите Alt + F8, чтобы открыть диалог «Макросы».
  8. Затем выберите нужный макрос из списка «Имя макроса» и нажмите кнопку «Выполнить».

Но если какая-либо формула возвращает возврат каретки, я боюсь, что с этим ничего нельзя поделать. Макрос не может найти, где именно в формуле происходит возврат каретки, поэтому он обрабатывает результат формулы, а не формулу как таковую.

Удаляем перенос строки с помощью надстройки Ultimate Suite.

Если вы являетесь пользователем Ultimate Suite for Excel , то вам не нужно тратить время на какие-либо из вышеперечисленных манипуляций. Все, что требуется, — это 3 быстрых шага:

  1. Выберите одну или несколько ячеек, в которых вы хотите удалить переносы строк.
  2. На ленте Excel перейдите на вкладку Ablebits Data  и нажмите кнопку «Преобразовать (Convert)» .
  3. На панели «Преобразовать текст» выберите переключатель «Конвертировать перенос строки в (Convert line break to)», введите в поле «заменяющий» символ (это может быть точка с запятой, точка, запятая, пробел) и нажмите кнопку «Преобразовать (Convert)» .

В нашем примере мы заменяем каждый перенос строки пробелом:

В результате у вас будет аккуратно организованная таблица с однострочными адресами, как это изображено на рисунке выше. Такой же результат мы получали выше и при помощи формул, но занимало это гораздо больше времени.

Это далеко не единственный инструмент для упрощения работы с текстом. Вы можете удалить лишние пробелы, изменить регистр символов, добавить текст в начале в конце, перед или после выбранных символов, удалить непечатаемые символы, извлечь часть текста по позиции или после указанных символов, извлечь числа из текста, разделить текст по столбцам или строкам и многое другое. Подробнее вы можете ознакомиться с этими возможностями на страничке обзора инструментов работы с текстом.

Если вам интересно попробовать этот и еще 60 инструментов для экономии времени для Excel, вы можете загрузить пробную версию Ultimate Suite . Вы будете приятно удивлены, когда найдете решения для самых сложных и утомительных задач в Excel всего в несколько кликов!

Итак, теперь вы легко можете убрать либо заменить символ переноса строки в вашей таблице Excel.

Ещё о работе с текстом в Excel:

Формула ЗАМЕНИТЬ и ПОДСТАВИТЬ для текста и чисел В статье объясняется на примерах как работают функции Excel ЗАМЕНИТЬ (REPLACE в английской версии) и ПОДСТАВИТЬ (SUBSTITUTE по-английски). Мы покажем, как использовать функцию ЗАМЕНИТЬ с текстом, числами и датами, а также…
Как сделать диаграмму Ганта Думаю, каждый пользователь Excel знает, что такое диаграмма и как ее создать. Однако один вид графиков остается достаточно сложным для многих — это диаграмма Ганта.  В этом кратком руководстве я постараюсь показать…
Как сделать автозаполнение в Excel В этой статье рассматривается функция автозаполнения Excel. Вы узнаете, как заполнять ряды чисел, дат и других данных, создавать и использовать настраиваемые списки в Excel. Эта статья также позволяет вам убедиться, что вы…
Быстрое удаление пустых столбцов в Excel В этом руководстве вы узнаете, как можно легко удалить пустые столбцы в Excel с помощью макроса, формулы и даже простым нажатием кнопки. Как бы банально это ни звучало, удаление пустых…
6 способов быстро транспонировать таблицу В этой статье показано, как столбец можно превратить в строку в Excel с помощью функции ТРАНСП, специальной вставки, кода VBA или же специального инструмента. Иначе говоря, мы научимся транспонировать таблицу.…

Переносы строк внутри одной ячейки, добавляемые с помощью сочетания клавиш 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:

Деление на столбцы по Alt+Enter

Если в ваших данных может встречаться несколько переносов строк подряд, то можно их «схлопнуть», включив флажок Считать последовательные разделители одним (Treat consecutive delimiters as one).

После нажатия на Далее (Next) и прохождения всех трёх шагов мастера мы получим желаемый результат:

Результат деления

Обратите внимание, что до выполнения этой операции необходимо вставить справа от разделяемого столбца достаточное количество пустых колонок, чтобы образовавшийся текст не затёр те значения (цены), которые были справа.

Деление на строки по Alt+Enter через Power Query

Ещё одной любопытной задачей является деление многострочного текста из каждой ячейки не на столбцы, а на строки:

Деление на строки по Alt+Enter

Вручную такое делать долго, формулами — сложно, макросом — не каждый напишет. А на практике подобная задача встречается чаще, чем хотелось бы. Самым простым и лёгким решением будет использовать для этой задачи возможности надстройки 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:

Грузим нашу таблицу в Power Query

После загрузки выделим столбец с многострочным текстом в ячейках и выберем на Главной вкладке команду Разделить столбец — По разделителю (Home — Split Column — By delimiter):

Деление столбца на строки в Power Query

Скорее всего, 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, чтобы запустить созданный макрос, который и проделает за вас всю работу:

Работа макроса разделения на строки по Alt+Enter

Вуаля! Программисты — это, на самом деле, просто очень ленивые люди, которые лучше один раз как следует напрягутся, чтобы потом ничего не делать :)

Ссылки по теме

  • Зачистка текста от мусора и лишних символов
  • Замена текста и зачистка от неразрывных пробелов функцией ПОДСТАВИТЬ
  • Как разделить слипшийся текст на части в Excel

Эта инструкция познакомит Вас с тремя способами удалить возвраты каретки из ячеек в Excel. Вы также узнаете, как заменить символы переноса строки другими символами. Все предложенные решения работают в Excel 2013, 2010, 2007 и 2003.

Удаляем переносы строк в Excel

Переносы строк могут появиться в тексте по разным причинам. Обычно возвраты каретки встречаются в рабочей книге, например, когда текст скопирован с веб-страницы, когда они уже есть в рабочей книге, полученной от клиента, или, когда мы сами добавляем их нажатием клавиш Alt+Enter.

Какой бы ни была причина их появления, сейчас перед нами стоит задача удалить возвраты каретки, так как они мешают выполнять поиск фраз и приводят к беспорядку в столбце при включении режима переноса текста.

Все три представленных способа довольно быстры. Выбирайте тот, который Вам больше подходит:

  • Удаляем все переносы строк вручную, чтобы быстро навести порядок на одном листе.
  • Удаляем переносы строк при помощи формул и настраиваем таким образом комплексную обработку текстовых данных в ячейках.
  • Используем макрос VBA, чтобы очистить от переносов строк несколько рабочих книг.

Замечание: Первоначально термины «Возврат каретки» и «Перевод строки» использовались при работе на печатных машинках и обозначали две различных операции. Любознательный читатель может самостоятельно найти подробную информацию об этом в интернете.

Компьютеры и программное обеспечение для работы с текстами разрабатывались с учётом особенностей печатных машинок. Вот почему теперь для обозначения разрыва строки используют два различных непечатаемых символа: Возврат каретки (Carriage return, CR или ASCII код 13) и Перевод строки (Line feed, LF или ASCII код 10). В Windows используются оба символа вместе, а в системах *NIX применяется только перевод строки.

Будьте внимательны: В Excel встречаются оба варианта. При импорте из файлов .txt или .csv данные обычно содержат возвраты каретки и переводы строки. Когда перенос строки вводится вручную нажатием Alt+Enter, Excel вставляет только символ перевода строки. Если же файл .csv получен от поклонника Linux, Unix или другой подобной системы, то готовьтесь к встрече только с символом перевода строки.

Содержание

  1. Удаляем возвраты каретки вручную
  2. Удаляем переносы строк при помощи формул Excel
  3. Удаляем переносы строк при помощи макроса VBA

Удаляем возвраты каретки вручную

Плюсы: Этот способ самый быстрый.

Минусы: Никаких дополнительных плюшек 🙁

Вот так можно удалить переносы строк при помощи инструмента «Найти и заменить»:

  1. Выделите все ячейки, в которых требуется удалить возвраты каретки или заменить их другим символом.Удаляем переносы строк в Excel
  2. Нажмите Ctrl+H, чтобы вызвать диалоговое окно Найти и заменить (Find and Replace).
  3. Поставьте курсор в поле Найти (Find what) и нажмите Ctrl+J. На первый взгляд поле покажется пустым, но если посмотрите внимательно, то увидите в нём маленькую точку.
  4. В поле Заменить на (Replace With) введите любое значение для вставки вместо возвратов каретки. Обычно для этого используют пробел, чтобы избежать случайного склеивания двух соседних слов. Если нужно просто удалить переносы строк, оставьте поле Заменить на (Replace With) пустым.Удаляем переносы строк в Excel
  5. Нажмите кнопку Заменить все (Replace All) и наслаждайтесь результатом!Удаляем переносы строк в Excel

Удаляем переносы строк при помощи формул Excel

Плюсы: Доступно использование последовательных или вложенных формул для сложной проверки текста в обрабатываемой ячейке. Например, можно удалить возвраты каретки, а затем найти лишние начальные или конечные пробелы, или лишние пробелы между словами.

В некоторых случаях переносы строк необходимо удалять, чтобы в дальнейшем использовать текст в качестве аргументов функций, не внося изменения в исходные ячейки. Результат можно использовать, например, как аргумент функции ПРОСМОТР (LOOKUP).

Минусы: Потребуется создать вспомогательный столбец и выполнить множество дополнительных шагов.

  1. Добавьте вспомогательный столбец в конце данных. В нашем примере он будет называться 1 line.
  2. В первой ячейке вспомогательного столбца (C2) введите формулу для удаления/замены переносов строк. Ниже приведены несколько полезных формул для различных случаев:
    • Эта формула подходит для использования с комбинациями возврат каретки / перенос строки, характерными для Windows и для UNIX.

      =ПОДСТАВИТЬ(ПОДСТАВИТЬ(B2;СИМВОЛ(13);"");СИМВОЛ(10);"")
      =SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),""),CHAR(10),"")

    • Следующая формула подходит для замены переноса строки любым другим символом (например, «, » – запятая + пробел). В таком случае строки не будут объединены и лишние пробелы не появятся.

      =СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(B2;СИМВОЛ(13);"");СИМВОЛ(10);", ")
      =TRIM(SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),""),CHAR(10),", ")

    • А вот так можно удалить все непечатаемые символы из текста, включая переносы строк:

      =ПЕЧСИМВ(B2)
      =CLEAN(B2)

    Удаляем переносы строк в Excel

  3. Скопируйте формулу во все ячейки столбца.
  4. По желанию, можете заменить исходный столбец новым, с удалёнными переносами строк:
    • Выделите все ячейки в столбце C и нажатием Ctrl+C скопируйте данные в буфер обмена.
    • Далее выделите ячейку B2, нажмите сочетание клавиш Shift+F10 и выберите Вставить (Insert).
    • Удалите вспомогательный столбец.

Удаляем переносы строк при помощи макроса VBA

Плюсы: Создаём один раз – используем снова и снова с любой рабочей книгой.

Минусы: Требуется хотя бы базовое знание VBA.

Макрос VBA из следующего примера удаляет возвраты каретки из всех ячеек на активном листе.

Sub RemoveCarriageReturns()
    Dim MyRange As Range
    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual
 
    For Each MyRange In ActiveSheet.UsedRange
        If 0 < InStr(MyRange, Chr(10)) Then
            MyRange = Replace(MyRange, Chr(10), "")
        End If
    Next
 
    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic
End Sub

Если Вы не слишком близко знакомы с VBA, рекомендую изучить статью о том, как вставить и выполнить код VBA в Excel.

Оцените качество статьи. Нам важно ваше мнение:

А вы знаете как убрать переносы строк внутри ячейки Excel?

Как убрать переносы строк в ячейке Excel

Расскажу вам о трёх способах.

Способ №1

Как убрать переносы строк в ячейке Excel

Если ячеек с переносами строк мало, то просто удалите символы или в конце, или в начале строки внутри ячейки с помощью клавиш Backspace или Delete.

Если ячеек с переносами много, то вам подойдут способы №2 и №3.

Способ №2

Как убрать переносы строк в ячейке Excel
Для начала определите: есть ли в конце каждой строки ячейки пробел?

Для этого щелкните дважды левой клавишей мыши по ячейке и выделите крайний символ в строке.

Если символ выделяется – пробел есть.

Если есть пробел в конце строки.

Как убрать переносы строк в ячейке Excel

▪️ Нажмите сочетание клавиш CTRL+H

Telegram Logo Больше лайфхаков в нашем Telegram Подписаться

▪️ В поле Найти нажмите сочетание клавиш CTRL+J для вставки символа переноса

▪️  Поле Заменить на оставьте пустым

▪️  Щелкните Заменить все и Закрыть

Если НЕТ пробела в конце строки:

Как убрать переносы строк в ячейке Excel

▪️  Нажмите сочетание клавиш CTRL+H

▪️  В поле Найти нажмите сочетание клавиш CTRL+J для вставки символа переноса

▪️  В поле Заменить на поставьте пробел

▪️  Щелкните Заменить все и Закрыть

Способ №3

В соседней ячейке примените функцию ПЕЧСИМВ (англ. CLEAN) для удаления непечатаемых символов.

Как убрать переносы строк в ячейке Excel

Все три способа успешно уберут переносы 👇

Как убрать переносы строк в ячейке Excel

Поделитесь, пожалуйста, в комментариях, какой способ вам понравился больше?

Как удалить переносы строк (возвраты каретки) из ячеек в Excel 2013, 2010 и 2007

​Смотрите также​Д_Р​ со вcтроенным языком​ и вариант без​: Цитата: «Пробовала из​Светлана В​ Dim OutText As​ Exit Function End​ будет незаметно:​ функцию СИМВОЛ в​ предыдущие варианты.​, отметив его галочкой.​

Удаляем переносы строк в Excel

​Некоторые пользователи пытаются перенести​и выберите​(LOOKUP).​ возвраты каретки или​ две различных операции.​Эта инструкция познакомит Вас​: Макрос не не​ программирования Fred и​ макроса: чтобы после​ форда вставлять -​: Добрый день. Возник​ String Delimeter =​ If ‘проходим по​​Но на гистограммах, графиках​​ нужное место формулы,​

​Урок:​ Жмем на кнопку​ текст внутри ячейки​Вставить​Минусы:​ заменить их другим​ Любознательный читатель может​ с тремя способами​ сохраняет пробел… а​ возможностью подключения скомпилированных​ Ctrl-F ввести в​

​ не понимает его​ вопрос — есть​ Chr(10)​ все ячейкам, проверяем​

  • ​ и диаграммах символы​ которая генерирует значения​Полезные функции Excel​«OK»​
  • ​ нажатием на клавиатуре​(Insert).​Потребуется создать вспомогательный​ символом.​ самостоятельно найти подробную​
  • ​ удалить возвраты каретки​ его там в​ ассемблерных и С-кодов.​ поле «Найти» знак​

​ эксель». А если​​ большая таблица в​excel_pl​ условие и собираем​ переноса строк, вставленные​ в ячейках для​В целом пользователь должен​.​ кнопки​Удалите вспомогательный столбец.​ столбец и выполнить​

​Нажмите​ информацию об этом​ из ячеек в​ принципе не бывает.​Возможной причиной неработы​ перевода строки, нужно​ наоборот: берем в​ кучей данных. В​: А каких-нибудь спец.​​ текст в переменную​​ с помощью формул​ подписи данных гистограммы.​ сам решить, каким​​После этого, если данные​​Enter​Плюсы:​ множество дополнительных шагов.​Ctrl+H​ в интернете.​ Excel. Вы также​Ну вот как​

​ Ctrl-J у Алексея​​ нажать Ctrl-J​ XL, вставляем в​ некоторых ячейках текст​​ символов вместо запятой​​ OutText For i​​ либо введенные из​​Конечно в ячейке можно​ из предложенных способов​ будут выступать за​. Но этим они​Создаём один раз​​Добавьте вспомогательный столбец в​​, чтобы вызвать диалоговое​Компьютеры и программное обеспечение​ узнаете, как заменить​​ в ворде печатают​​ (Alex_ST) может быть,​Остается только очистить​ Word, выделяем, жмем​ представлен в виде​ для строчки «​ = 1 To​

Удаляем возвраты каретки вручную

​ клавиатуры (ALT+Enter) будут​​ сделать перенос строки​ оптимальнее воспользоваться в​

​ границы ячейки, то​​ добиваются только того,​:(

​ – используем снова​ конце данных. В​ окно​​ для работы с​​ символы переноса строки​

  1. ​Иванов(энтер)Иван Иванович, то​ например, какая-нибудь утилита​ поле «Заменить на»​ (если не ошибся)​ нескольких строк, как​Удаляем переносы строк в Excel
  2. ​Delimeter = «, «​​ SearchRange.Cells.Count If SearchRange.Cells(i)​​ отображаться естественным образом.​ в любом месте​​ конкретном случае. Если​​ она автоматически расширится​
  3. ​ что курсор перемещается​​ и снова с​​ нашем примере он​Найти и заменить​​ текстами разрабатывались с​​ другими символами. Все​ есть по факту​ автоматического переключения раскладки​ и нажать кнопку​ «Alt+X» — получаем​ если бы его​
  4. ​» нету?​​ Like Condition Then​​ То есть переносом​ с помощью комбинации​ вы хотите только,​ в высоту, а​ на следующую строку​ любой рабочей книгой.​ будет называться​(Find and Replace).​ учётом особенностей печатных​ предложенные решения работают​​ там пробела и​​ клавиатуры.​Удаляем переносы строк в Excel
  5. ​ «Заменить все».​​ код. Далее в​​ вводили вручную через​например, что-нибудь в​Удаляем переносы строк в Excel

Удаляем переносы строк при помощи формул Excel

​ OutText = OutText​​ разбивать одну текстовую​ клавиш ALT+Enter. Но​ чтобы все символы​ слова станут переноситься.​ листа. Мы же​Минусы:​1 line​Поставьте курсор в поле​ машинок. Вот почему​ в Excel 2013,​ нет.​

​Вставка символа перевода​Alex_ST​ XL, к примеру,​ Alt+Enter. Подскажите, как​ духе :​ & TextRange.Cells(i) &​ строку на две​ если таких ячеек​ вмещались в границы​ Иногда приходится расширять​​ рассмотрим варианты переноса​​Требуется хотя бы​

​.​​Найти​ теперь для обозначения​ 2010, 2007 и​

  1. ​Тогда наверное нужна​ строки по Ctrl-J​: Наверное, «очепятка» -​ «=СИМВОЛ(160)»…​​ убрать эти знаки​​rn​
  2. ​ Delimeter Next i​ и больше.​ десятки лучше автоматизировать​ ячейки, то просто​ границы вручную.​ именно внутри ячейки,​ базовое знание VBA.​
    • ​В первой ячейке вспомогательного​(Find what) и​ разрыва строки используют​ 2003.​ просто замена знака​ полезна не только​

      ​ не Ctrl+J, а​
      ​Z.​

    • ​ переноса, либо заменить​;​ ‘выводим результаты без​Знаю что в C/C#​ данный процесс с​ отформатируйте её нужным​Чтобы подобным образом не​ как очень простые,​Макрос VBA из следующего​ столбца (C2) введите​

      ​ нажмите​
      ​ два различных непечатаемых​

    • ​Переносы строк могут появиться​ переноса строки на​ в поиске-замене, но​ Ctrl+H ? Или​

      ​Светлана В​
      ​ их на пробелы?​

    Удаляем переносы строк в Excel

  3. ​Sanja​ последнего разделителя MergeIf​
  4. ​ это символ -​ помощью простой выше​ образом, а лучше​ форматировать каждый отдельный​
    • ​ так и более​ примера удаляет возвраты​​ формулу для удаления/замены​​Ctrl+J​​ символа:​​ в тексте по​ пробел, а потом​
    • ​ и в пользовательском​​ я чего-то не​​: Вы не поверите,​​Ячейки заранее неизвестны.​​: Kuzmich, же Вам​​ = Left(OutText, Len(OutText)​​ n, а как​
    • ​ приведенной формулы.​

Удаляем переносы строк при помощи макроса VBA

​ всего отформатировать весь​​ элемент, можно сразу​ сложные.​ каретки из всех​ переносов строк. Ниже​

​. На первый взгляд​​Возврат каретки​ разным причинам. Обычно​

​ trim чтобы удалить​ формате. Приложил пример,​ знаю?​ но это была​ Я бы через​

​ показал​ — Len(Delimeter)) End​ можно программно задать​​ диапазон. Если вы​ выделить целую область.​Самый простой вариант переноса​ ячеек на активном​ приведены несколько полезных​ поле покажется пустым,​(Carriage return, CR​ возвраты каретки встречаются​ второй лишний пробел…​

​ когда в ячейке​ZVI​ не я)))))​ Заменить сделала, но​Юрий М​ Function​ принудительный перенос строки​

​Программа MS Excel активно​ хотите устроить перенос​
​ Недостаток данного варианта​
​ на другую строку,​

​ листе.​

office-guru.ru

Перенос строки в пределах ячейки в Microsoft Excel

Перенос строки в Microsoft Excel

​ формул для различных​ но если посмотрите​ или ASCII код​ в рабочей книге,​Д_Р​ нужно хранить дробное​: Алексей, Ctrl-J нажимать,​Но спасибо, этот​ не знаю, как​: excel_pl, Вы не​Сцепка происходит по​ в excel?​ применяет коды из​ конкретных слов, то​ заключается в том,​ это установить курсор​Sub RemoveCarriageReturns() Dim​

​ случаев:​ внимательно, то увидите​

Способы переноса текста

​ 13) и​ например, когда текст​: сам спросил сам​ число, но отображать​​ когда курсор находится​​ способ намного удобнее,​ в экселе обозначить​ отписались в своих​ принципу:​…​ таблицы символов стандарта​ наберите соответствующее сочетание​ что перенос выполняется​ перед тем отрезком,​ MyRange As Range​

Способ 1: использование клавиатуры

​Эта формула подходит для​ в нём маленькую​Перевод строки​ скопирован с веб-страницы,​ решил;)​ только целые с​ в поле «Найти».​ чем мой кривенький​​ знак переноса.​​ старых темах, а​

Ячейка где нужно перенести слова в Microsoft Excel

​Текст 1, Текст​: Если в макросе:​​ ASCII. В ней​​ клавиш, как рассказано​ только в том​ который нужно перенести,​ Application.ScreenUpdating = False​

Перенос слов очуществлен в Microsoft Excel

​ использования с комбинациями​​ точку.​

Способ 2: форматирование

​(Line feed, LF​ когда они уже​fly1​ отброшенной дробной частью,​Alex_ST​ макрос)​Переносить в Ворд,​ уже создали новую.​ 2​»Строка1″ & vbCr​ находятся все коды​

  1. ​ в описании первого​ случае, если слова​ а затем набрать​ Application.Calculation = xlCalculationManual​ возврат каретки /​В поле​ или ASCII код​​ есть в рабочей​​: Можно узнать решение?​

    Переход в формат ячеек в Microsoft Excel

  2. ​ т.е. без округления.​: Я уж и​​Nicks​​ чистить там, а​​ Или ответы не​​Вопрос​​ & vbLf &​​ символов, которые высвечиваются​ способа. Третий вариант​​ не будут вмещаться​​ на клавиатуре сочетание​

Формат ячеек в Microsoft Excel

​ For Each MyRange​ перенос строки, характерными​Заменить на​ 10). В Windows​ книге, полученной от​ Тоже нужно​Anna​ левый Ctrl+J и​

​: Как вариант формула​ потом обратно в​ интересуют?​Как сделать чтобы​ «Строка2″​ на экране в​ рекомендуется использовать только​ в границы, к​ клавиш​ In ActiveSheet.UsedRange If​ для Windows и​(Replace With) введите​ используются оба символа​ клиента, или, когда​

Способ 3: использование формулы

​Казанский​: а как в​ правый, а всё​ =ПЕЧСИМВ() далее по​ Эксель — не​excel_pl​ разделитель был не​Если в ячейке​ операционной системе MS​ тогда, когда данные​

  1. ​ тому же разбитие​Alt+Enter​
  2. ​ 0 < InStr(MyRange,​ для UNIX.​ любое значение для​ вместе, а в​

    ​ мы сами добавляем​

    ​: Видимо, заменить Ctrl+J​​ формулу вставить знак​​ бестолку… Данные не​​ потребностям….​​ вариант.​: Вопрос решён.​ «, «, а​ перенос:​ Windows любых версий.​

    Применение функции СЦЕПИТЬ в Microsoft Excel

  3. ​ подтягиваются из других​ осуществляется автоматически без​.​​ Chr(10)) Then MyRange​​=ПОДСТАВИТЬ(ПОДСТАВИТЬ(B2;СИМВОЛ(13);»»);СИМВОЛ(10);»»)​

Слова перенесены при помощи фнкции в Microsoft Excel

​ вставки вместо возвратов​ системах *NIX применяется​ их нажатием клавиш​ на пробел, или​ абзаца, допустим в​

​ найдены. Хотя я​​Светлана В​

​Спасибо.​Всем спасибо.​ перенос текста на​Alt + Enter​ Таблица символов стандарта​ диапазонов с помощью​ учета желания пользователя.​В отличие от использования​ = Replace(MyRange, Chr(10),​=SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),»»),CHAR(10),»»)​ каретки. Обычно для​ только перевод строки.​Alt+Enter​…​ формулу СЦЕПИТЬ()?​ сам вводил перенос​: было бы пару​Guest​Igor_Tr​ следующую строчку?​Если в формуле:​ ASCII содержит 255​ формулы. В остальных​Также можно осуществить перенос​ только одной кнопки​ «») End If​Следующая формула подходит для​ этого используют пробел,​Будьте внимательны:​.​

​Cells.Replace What:=Chr(10), Replacement:=»​

lumpics.ru

Как сделать перенос строки в ячейке Excel формулой

​точнее не знак,​ строки в ячейку…​ столбцов в иходнике​: А точнее? Вариантов​: В ячейке ввели​Т.е., чтобы сцепка​=»Строка1″ & CHAR(10)​ кодов по которым​ случаях использование данного​ внутри ячейки при​Enter​

Формула для переноса строки в ячейках Excel

​ Next Application.ScreenUpdating =​ замены переноса строки​ чтобы избежать случайного​В Excel встречаются​Какой бы ни была​ » …​ а сам абзац,​А это точно​ — без вопросов)))​ море: найти-заменить, подставить​ строку при помощи​ происходила по принципу:​ & «Строка2» (англ.​

Гистограммы.

​ пронумерованы все символы​ способа является нерациональным,​ помощи формул. Этот​, с помощью этого​ True Application.Calculation =​ любым другим символом​ склеивания двух соседних​ оба варианта. При​

Код СИМВОЛ переноса строки.

​ причина их появления,​…​ чтобы тескт с​ под 2003-им работает?​ но в данном​ (знать код знака),​ Alt + Enter​Текст 1​ Excel)​ от 1-го и​

​ так как имеются​

Как работает функция СИМВОЛ при переносе строк в ячейке

​ вариант особенно актуален​ способа будет достигнут​ xlCalculationAutomatic End Sub​ (например, «, »​ слов. Если нужно​ импорте из файлов​ сейчас перед нами​ъ​ абзаца начинался​KuklP​ случае строк и​ удалить ненужное -​ (переносить по словам).​Текст 2​=»Строка1″ & СИМВОЛ​ до 255. Например,​ гораздо более простые​ в том случае,​ именно такой результат,​Если Вы не слишком​ – запятая +​ просто удалить переносы​.txt​ стоит задача удалить​: fly1, Вы это​Казанский​: Леш, у меня​ столбцов — куча)))​

​ печсимв, сжать пробелы,​ Средствами VBA ну​Sanja​ (10) & «Строка2″​ большая (в верхнем​ варианты решения поставленной​ если содержимое выводится​ который ставится.​ близко знакомы с​ пробел). В таком​ строк, оставьте поле​или​ возвраты каретки, так​

​ видели?​: =СЦЕПИТЬ(СИМВОЛ(10);»текст»)​ работает(2003). И в​ данные идут с​ trim и т.п.​

Перенести текст.

​ никак не могу​: Function MergeIf(TextRange As​ (русск. Excel)​ регистре) буква А​ задачи.​ с помощью функций,​Урок:​ VBA, рекомендую изучить​ случае строки не​Заменить на​.csv​

exceltable.com

Какой символ в excel означает принудительный перенос строки?

​ как они мешают​fly1​или​ 2007 тоже. Срабатывает​ разных регионов, каждые​Z.​

​ избавиться от символа​​ Range, SearchRange As​
​Для использования в​ имеет код 97.​Автор: Максим Тютюшев​
​ но его можно​Горячие клавиши в Экселе​
​ статью о том,​
​ будут объединены и​
​(Replace With) пустым.​данные обычно содержат​ выполнять поиск фраз​
​: Вообще эта моя​=СИМВОЛ(10)&»текст»​ даже с vbcrlf,​
​ в меру способностей​Guest​ переноса (между выражениями​ Range, Condition As​ формуле — нужно,​ Числу 9 по​Во время создания графиков​

Как сделать перенос строки с использованием VBA?

​ применять и в​​Если перед пользователем не​ как вставить и​ лишние пробелы не​Нажмите кнопку​ возвраты каретки и​ и приводят к​ первая проба общения​В формате ячейки​ только vbcr оставляет.​ изгаляются с форматированием)​: Не уверен за​ — квадратик, тоесть​ String) Dim i​ чтобы в ячейке​ этой же таблице​ и диаграмм в​ обычных случаях.​ ставится задачи перенести​ выполнить код VBA​ появятся.​Заменить все​ переводы строки. Когда​ беспорядку в столбце​ с макросами.​ надо включить «переносить​Казанский​openid.mail.ru/mail/vlad3622340​ правильность ответа, но​ Chr(7)). Как убрать​ As Long ‘если​ в свойствах стоял​ присвоен код 57.​ Excel часто возникает​Отформатируйте ячейку, как указано​ на новую строку​ в Excel.​=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(B2;СИМВОЛ(13);»»);СИМВОЛ(10);», «)​
​(Replace All) и​ перенос строки вводится​
​ при включении режима​Создал в VBA​
​ по словам».​
​: Владимир,​: абзац СИМВОЛ(182)​ можно попробовать знак​ эту заразу? Встречал​ диапазоны проверки и​
​ включенный перенос слов.​ Код символа пробела​
​ необходимость сделать перенос​
​ в предыдущем варианте.​

​ строго определенные слова,​​Урок подготовлен для Вас​=TRIM(SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),»»),CHAR(10),», «)​ наслаждайтесь результатом!​ вручную нажатием​ переноса текста.​ такую запись:​vikttur​спасибо! Я смутно​мягкий перенос СИМВОЛ(172)​ переноса (абзаца) скопировать​ кто?​ склеивания не равны​ Иначе работать не​ – 32, а​ строки в тексте​Выделите ячейку и введите​ а нужно только​ командой сайта office-guru.ru​А вот так можно​Плюсы:​Alt+Enter​Все три представленных способа​Cells.Replace What:=Chr(10), Replacement:=»»,​: сочетание Alt+Enter создает​ помнил, что как-то​неразрывный пробел СИМВОЛ(160)​

​ в поле «Заменить:»,​​petr-sev​ друг другу -​ будет.​ код переноса строки​ ячейки и не​

​ в неё или​​ уместить их в​Источник: https://www.ablebits.com/office-addins-blog/2013/12/03/remove-carriage-returns-excel/​ удалить все непечатаемые​​Доступно использование последовательных​​, Excel вставляет только​
​ довольно быстры. Выбирайте​ LookAt:=xlPart, SearchOrder _​​ новую строку в​​ вводил перевод строки​

​Наверное, их надо​​ а в поле​: И не получится,​

​ выходим с ошибкой​​excel_pl​ имеет число 10.​ только. Например, чтобы​ в строку формул​ пределах одной ячейки,​Перевел: Антон Андронов​

​ символы из текста,​​ или вложенных формул​
​ символ перевода строки.​

planetaexcel.ru

Удалить из строки символ переноса по словам ?

​ тот, который Вам​​:=xlByRows, MatchCase:=False, SearchFormat:=False,​ ячейке. Это равнозначно​ в поле поиска​ найти и заменить​ «Заменть на:» ставим​ потому что код​ If SearchRange.Count <>​: Код сцепляет столбец​ В этой же​ получить лучший визуальный​ следующее выражение:​ не выходя за​

​Автор: Антон Андронов​​ включая переносы строк:​ для сложной проверки​ Если же файл​ больше подходит:​ ReplaceFormat:=False​
​ вставке СИМВОЛ(10)​ еще в Excel​ на пробел СИМВОЛ(32)​ пробел или оставлеям​
​ символа принудительного переноса​ TextRange.Count Then MergeIf​

​ по критериюСкрытый текст​​ таблице содержатся непечатные​ эффект для читабельности​=СЦЕПИТЬ(«ТЕКСТ1″;СИМВОЛ(10);»ТЕКСТ2»)​ её границы, то​
​Как известно, по умолчанию​=ПЕЧСИМВ(B2)​ текста в обрабатываемой​.csv​Удаляем все переносы строк​

CyberForum.ru

Как удалить значки переноса в ячейке

​End Sub​​Д_Р​ 5 (под Win​Nicks​ пусто.​ не 7, а​ = CVErr(xlErrRef) Exit​ Option Compare Text​ символы с клавиатуры.​ подписей данных на​Вместо элементов​ можно воспользоваться инструментом​ в одной ячейке​=CLEAN(B2)​
​ ячейке. Например, можно​получен от поклонника​ вручную, чтобы быстро​Cells.Replace What:=Chr(10), Replacement:=»​: Всех с наступающим!​ 3.11), но забыл​

​: Не надо жалеть​Светлана В​ 10​ Function End If​ Function MergeIf(TextRange As​
​Зная соответствующие коды из​

​ графиках и диаграмме.​​«ТЕКСТ1»​ форматирования.​ листа Excel располагается​Скопируйте формулу во все​ удалить возвраты каретки,​ Linux, Unix или​
​ навести порядок на​

​ «​​немножко реанимирую тему.​ как.​ места на диске​: Попробовать-то можно, но​Замена в текущей​ For i =​ Range, SearchRange As​ таблицы ASCII и​Рассмотрим пример ниже на​

​и​​Выделяем ячейку, в которой​ одна строка с​ ячейки столбца.​ а затем найти​ другой подобной системы,​ одном листе.​
​В результате идёт​Sub Удалить_переносы()​Алексей,​

​ — всегда в​

​ как именно выглядит​ ячейке этого символа​
​ 1 To SearchRange.Cells.Count​ Range, Condition As​
​ используя функцию СИМВОЛ,​

​ рисунке с гистограммой,​​«ТЕКСТ2»​ текст выходит за​ числами, текстом или​По желанию, можете заменить​ лишние начальные или​ то готовьтесь к​Удаляем переносы строк при​ ошибка:​Cells.Replace What:=Chr(10), Replacement:=»»,​в 2007 и​ таких случаях пресоздаю​ этот знак? Пробовала​
​ на пробел будет​

​ If SearchRange.Cells(i) Like​​ String) Dim Delimeter​ мы имеем возможность​ созданной в программе​
​нужно подставить слова​ пределы границ. Кликаем​ другими данными. Но,​ исходный столбец новым,​

​ конечные пробелы, или​​ встрече только с​ помощи формул и​Compile error:​

​ LookAt:=xlPart, SearchOrder _​​ в 2000 работает.​ файл на основе​ из форда вставлять​ выглядеть примерно так:​ Condition Then If​ As String, i​ вставить любой символ​ Excel. Подписи оси​ или наборы слов,​ по ней правой​

​ что делать, если​​ с удалёнными переносами​
​ лишние пробелы между​
​ символом перевода строки.​
​ настраиваем таким образом​Invalid outside procedure​:=xlByRows, MatchCase:=False, SearchFormat:=False,​

​ Попробуй ввести аб​​ таких опусов. За​ — не понимает​ActiveCell = Replace(ActiveCell.Text,​ MergeIf <> Empty​ As Long Delimeter​ в формулу Excel.​ X содержат имена​ которые хотите перенести.​

​ кнопкой мыши. В​​ нужно перенести текст​ строк:​ словами.​

​Плюсы:​​ комплексную обработку текстовых​В справке пока​ ReplaceFormat:=False​

​ (буква перед и​​ одно избавляюсь от​ его эксель.​ Chr(10), » «)​ Then MergeIf =​ = «, «​ У выше описанном​ продавцов и данные​
​ Остальные символы формулы​ открывшемся списке выбираем​ в пределах одной​Выделите все ячейки в​

​В некоторых случаях переносы​​Этот способ самый​ данных в ячейках.​ ответа не нашёл.​End Sub{/post}{/quote}​ буква после), чтобы​

​ кучи сопутствующих проблем…​​Короче, не стала​Igor_Tr​ MergeIf & TextRange.Cells(i)​

​ ‘символы-разделители (можно заменить​​ примере вставлен символ​ о продажах. Такой​ изменять не нужно.​ пункт​ ячейки на другую​ столбце​ строк необходимо удалять,​
​ быстрый.​Используем макрос VBA, чтобы​

​ В любом случае,​​макрос отлично работает,​ нагляднее было.​Анель​ мучаться, быстренько сделала​: Заработалааа!! А можно​

​ & vbCrLf Else​​ на пробел или​
​ переноса строки, который​ пример подписи данных​Для того, чтобы результат​«Формат ячеек…»​ строку? Данную задачу​C​ чтобы в дальнейшем​Минусы:​

​ очистить от переносов​
​ всем спасибо за​ есть одно небольшое​ZVI​: Супер !!!! Макрос​ коротенький макрос​ подсказать, символ чего​

​ MergeIf = TextRange.Cells(i)​​ ; и т.д.)​ соединен с обеих​ на гистограмме всегда​ отобразился на листе,​.​ можно выполнить, воспользовавшись​и нажатием​ использовать текст в​Никаких дополнительных плюшек​ строк несколько рабочих​ подсказку.​ НО! он не​

​: Алексей (Казанский), а​ работает. 5 сек​Sub Удалить_переносы()​ Ch(7). Спасибо еще​ & vbCrLf End​ ‘если диапазоны проверки​

​ сторон оператором &​ пригодиться, когда текст​ нажмите кнопку​Открывается окно форматирования. Переходим​ некоторыми возможностями программы.​Ctrl+C​ качестве аргументов функций,​Вот так можно удалить​ книг.​mouse​ сохраняет пробел..​ я тогда этого​

​ и все готово​​Cells.Replace What:=Chr(10), Replacement:=»»,​ раз!​ If End If​ и склеивания не​
​ между значениями ячеек​ должен компактно расположиться​Enter​ во вкладку​

​ Давайте разберемся, как​​скопируйте данные в​
​ не внося изменения​
​ переносы строк при​

​Замечание:​: У меня работает​Иванов​

​ не знал, и​​svetlanav​ LookAt:=xlPart, SearchOrder _​Все! Наверно, мозги​ Next i End​

​ равны друг другу​​ A2 и C2.​
​ так, чтобы не​

​на клавиатуре.​

​«Выравнивание»​ сделать перевод строки​
​ буфер обмена.​ в исходные ячейки.​
​ помощи инструмента «​

​Первоначально термины «Возврат​ так​Иван Иванович​ вообще Excel стал​
​: как приятно, когда​
​:=xlByRows, MatchCase:=False, SearchFormat:=False,​

​ закипели. Ch(7) -​

​ Function​
​ — выходим с​Если в ячейке не​

​ затенять элементы гистограммы.​​Главным недостатком данного способа​. В блоке настроек​ в ячейке в​Далее выделите ячейку​
​ Результат можно использовать,​Найти и заменить​
​ каретки» и «Перевод​Sub test()​получается​ воспринимать только с​
​ мои кривоватые куски​ ReplaceFormat:=False​ это вставка символа,​Kuzmich​ ошибкой If SearchRange.Count​ включен режим «Перенести​

​Секрет данного решения весьма​​ является тот факт,​«Отображение»​

​ Excel.​​B2​ например, как аргумент​

​»:​​ строки» использовались при​Cells.Replace What:=Chr(10), Replacement:=»»,​

​ИвановИван Иванович…​
​ 8-й версии, до​ кода кому-то помогают))​
​End Sub​

​ верхней жирной точки.​​: В ячейке включить​ <> TextRange.Count Then​

​ текст», то наличие​​ прост и элементарен.​ что он сложнее​выбираем параметр​
​Скачать последнюю версию​, нажмите сочетание клавиш​

​ функции​Выделите все ячейки, в​
​ работе на печатных​ LookAt:=xlPart​
​есть рецепт? заранее​
​ него мне больше​ZVI​

​Z​ Пошел пить пиво!!!​
​ перенос по словам​
​ MergeIf = CVErr(xlErrRef)​

​ символа переноса строки​ Просто необходимо добавить​ в выполнении, чем​«Переносить по словам»​ Excel​

​Shift+F10​​ПРОСМОТР​ которых требуется удалить​

​ машинках и обозначали​
​End Sub​ спасибо!​
​ нравился пакет Framework-IV​

planetaexcel.ru

​: Может кому-нибудь пригодится​

Содержание

  1. Как удалить переносы строк (возвраты каретки) из ячеек в EXCEL
  2. УДАЛЯЕМ ВОЗВРАТЫ КАРЕТКИ
  3. Символ переноса строки в Excel. Как сделать перенос строки в ячейке Excel — все способы
  4. Как удалить переносы строк из ячеек в Excel 2013, 2010 и 2007
  5. Удаляем возвраты каретки вручную
  6. Удаляем переносы строк при помощи формул Excel
  7. Удаляем переносы строк при помощи макроса VBA
  8. Перенос текста в ячейке
  9. Автоматический перенос текста
  10. Настройка высоты строки для отображения всего текста
  11. Ввод разрыва строки
  12. Как сделать перенос строки в ячейке Excel формулой
  13. Формула для переноса строки в ячейках Excel
  14. Как работает функция СИМВОЛ при переносе строк в ячейке
  15. Деление на столбцы по переносу строки
  16. Деление на строки по Alt+Enter через Power Query
  17. Макрос для деления на строки по Alt+Enter
  18. Выводы

Как удалить переносы строк (возвраты каретки) из ячеек в EXCEL

Переносы строк могут появиться в тексте по разным причинам. Обычно возвраты каретки встречаются в рабочей книге, например, когда текст скопирован с веб-страницы, когда они уже есть в рабочей книге, полученной от клиента, или, когда мы сами добавляем их нажатием клавиш Alt+Enter .

Какой бы ни была причина их появления, сейчас перед нами стоит задача удалить возвраты каретки, так как они мешают выполнять правильную выгрузку данных в формат CSV.

При выгрузке одна строка превращается в несколько, что не позволит корректно загрузить данные на сайт.

УДАЛЯЕМ ВОЗВРАТЫ КАРЕТКИ

  1. Нажмите Ctrl+А, что бы выделить всю книгу или выделите нужные вам ячейки или столбцы.
  2. Нажмите Ctrl+H, что бы вызвать диалоговое окно Найти и заменить (Find and Replace).
  3. Поставьте курсор в поле Найти (Find what) и нажмите Ctrl+J.

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

  • В поле Заменить на (Replace With) введите любое значение для вставки вместо возвратов каретки. Обычно для этого используют пробел, чтобы избежать случайного склеивания двух соседних слов. Если нужно просто удалить переносы строк, оставьте поле Заменить на (Replace With) пустым.
  • Источник

    Символ переноса строки в Excel. Как сделать перенос строки в ячейке Excel — все способы

    Часто люди, работающие в табличной программе Эксель, сталкиваются с такой ситуацией, когда нужно совершить перенос строчки. Реализовать эту несложную процедуру можно разнообразными способами. В статье мы детально разберем все методы, позволяющие осуществить перенос строчки на рабочей области табличного документа.

    Как удалить переносы строк из ячеек в Excel 2013, 2010 и 2007

    Существует 3 метода, позволяющих реализовать удаление возврата каретки из полей. Некоторые из них реализуют замещение знаков переноса строчки. Рассмотренные ниже варианты одинаково работают в большинстве версий табличного редактора.

    1

    Перенос строчки в текстовой информации возникает по самым разнообразным причинам. К частым причинам относятся такие моменты, как использование сочетания клавиш «Alt+Enter», а также перенос текстовых данных из интернет-странички в рабочую область табличной программы. Нам необходимо произвести удаление возврата каретки, так как без этой процедуры невозможно реализовать нормальный поиск точных фраз.

    Важно! Изначально фразы «Перевод строчки» и «Возврат каретки» применялись во время работы на печатных машинах и обозначали 2 разнообразных действия. Персональные компьютеры создавались с учетом функций машинок для печати.

    Удаляем возвраты каретки вручную

    Разберем детально первый метод.

    • Преимущество: быстрота выполнения.
    • Недостаток: отсутствие дополнительных функций.

    Подробная инструкция выглядит так:

    1. Производим выделение всех ячеек, в которых необходимо реализовать данную операцию или же осуществить замену знаков.

    2

    1. При помощи клавиатуры жмем комбинацию кнопок «Ctrl+H». На экране возникло окошко, имеющее наименование «Найти и заменить».
    2. Выставляем указатель в строчку «Найти». При помощи клавиатуры жмем комбинацию кнопок «Ctrl+J». В строчке появилась небольшая точка.
    3. В строчку «Заменить на» вводим какое-нибудь значение, которое вставится вместо возвратов каретки. Чаще всего применяют пробел, так как он позволяет исключить склеивание 2-х соседствующих фраз. Для реализации удаления переноса строчек необходимо строчку «Заменить на» не заполнять какой-либо информацией.

    3

    1. При помощи ЛКМ щелкаем на «Заменить все». Готово! Мы реализовали удаление возврата каретки.

    4

    Удаляем переносы строк при помощи формул Excel

    • Преимущество: возможность применения разнообразных формул, осуществляющих сложнейшую проверку текстовой информации в выбранном поле. К примеру, можно реализовать удаление возвратов каретки, а потом отыскать ненужные пробелы.
    • Недостаток: необходимо создание дополнительной колонки, а также выполнение большого количества манипуляций.

    Подробная инструкция выглядит так:

    1. Реализуем добавление дополнительной колонки в конце исходной информации. В рассматриваемом примере она получит наименование «1 line»
    2. В 1-е поле дополнительной колонки (С2) вбиваем формулу, реализующую удаление или замену переносов строчек. Для осуществления этой операции применяется несколько формул. Формула, подходящая для применения с сочетаниями возврата каретки и переноса строчки, выглядит так: =ПОДСТАВИТЬ(ПОДСТАВИТЬ(В2;СИМВОЛ(13);»»);СИМВОЛ(10);»»).
    3. Формула, подходящая для осуществления замены переноса строчки каким-либо знаком, выглядит так: =СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(В2;СИМВОЛ(13);»»);СИМВОЛ(10);», «). Стоит заметить, что в этом случае не произойдет объединение строчек.
    4. Формула, позволяющая произвести удаление всех непечатаемых знаков из текстовых данных, выглядит так: =ПЕЧСИМВ(B2).

    5

    1. Производим копирование формулы, а затем вставляем ее в каждую ячейку дополнительной колонки.
    2. Дополнительно можно осуществить замену первоначальной колонки новой, в которой будут удалены переносы строчек.
    3. Производим выделение всех ячеек, располагающихся в колонке С. Зажимаем комбинацию «Ctrl+C» на клавиатуре, чтобы реализовать копирование информации.
    4. Производим выбор поля В2. Зажимаем комбинацию кнопок «Shift+F10». В возникшем небольшом перечне жмем ЛКМ на элемент, имеющий наименование «Вставить».
    5. Реализуем удаление вспомогательной колонки.

    Удаляем переносы строк при помощи макроса VBA

    • Преимущество: создание происходит только 1 раз. В дальнейшем этот макрос можно применять и в остальных табличных документах.
    • Недостаток: необходимо понимание работы языка программирования VBA.

    Для реализации этого метода нужно попасть в окошко для ввода макросов и ввести туда такой код:

    6

    Перенос текста в ячейке

    Табличный редактор Эксель позволяет осуществить перенос текстовой информации в поле. Это делается для того, чтобы текстовые данные выводились на нескольких строчках. Можно произвести процедуру настройки для каждого поля, чтобы перенос текстовых данных производился в автоматическом режиме. Дополнительно можно реализовать разрыв строчки ручным способом.

    Автоматический перенос текста

    Разберем детально, как реализовать процедуру автоматического переноса текстовых значений. Пошаговый алгоритм выглядит так:

    1. Производим выделение необходимой ячейки.
    2. В подразделе «Главная» находим блок команд, имеющий наименование «Выравнивание».
    3. При помощи ЛКМ выбираем элемент «Перенести текст».

    Важно! Информация, находящаяся в ячейках, будет переноситься с учетом ширины колонки. Редактирование ширины колонки автоматически настроит перенос текстовых данных.

    Настройка высоты строки для отображения всего текста

    Разберем детально, как реализовать процедуру настройки высоты строчки для вывода всей текстовой информации. Подробная инструкция выглядит так:

    1. Производим выбор нужных ячеек.
    2. В подразделе «Главная» находим блок команд, имеющий наименование «Ячейки».
    3. При помощи ЛКМ выбираем элемент «Формат».
    4. В окошке «Размер ячейки» необходимо выполнить один из нижеописанных вариантов. Первый вариант – для автоматического выравнивания высоты строчки жмем ЛКМ на элемент «Автоподбор высоты строки». Второй вариант – для задания высоты строчек ручным способом необходимо кликнуть на элемент «Высота строки», а затем вбить желаемый показатель в пустую строчку.

    Ввод разрыва строки

    Разберем детально как реализовать процедуру ввода разрыва строчки. Подробная инструкция выглядит так:

    1. Двойным нажатием ЛКМ осуществляем выбор поля, в которое желаем вбить разрыв строчки. Стоит заметить, что можно произвести выделение необходимого поля, а потом щелкнуть на «F2».
    2. Двойным нажатием ЛКМ осуществляем выбор того места, где будет добавлен разрыв строчки. Зажимаем комбинацию «Alt+Enter». Готово!

    Как сделать перенос строки в ячейке Excel формулой

    Часто пользователи табличного редактора добавляют на рабочую область разнообразные диаграммы и графики. Обычно эта процедура требует переноса строчек в текстовой информации поля. Детально разберемся, как реализовать этот момент.

    Формула для переноса строки в ячейках Excel

    К примеру, у нас есть гистограмма, реализованная в табличной программе. На оси Х располагаются имена работников, а также информация об их продажах. Этот тип подписи очень удобен, так как он наглядно показывает объем работ, совершаемый работниками.

    7

    Реализовать эту процедуру очень легко. Нужно произвести добавление оператора СИМВОЛ в место формулы. Она позволяет реализовать генерацию показателей в полях для подписи информации в диаграмму.

    8

    Безусловно, в поле можно реализовать процедуру переноса строчки в любом месте, благодаря комбинации кнопок «Alt+Enter». Однако такой метод неудобен в случаях, когда данных слишком много.

    Как работает функция СИМВОЛ при переносе строк в ячейке

    Программа использует коды из таблички знаков ASCII. В ней располагаются коды знаков, отображаемых на дисплее в ОС. В табличке содержится двести пятьдесят пять пронумерованных кодов.

    Пользователь табличного редактора, знающий эти коды, может применить их в операторе СИМВОЛ, чтобы реализовать вставку любого знака. В примере, рассмотренном выше, добавлен знак переноса строчки, который соединяется с двух сторон «&» между показателями полей С2 и А2. Если в поле не активирован режим под названием «Перенести текст», то наличие знака переноса строчки пользователь не заметит. Это видно на нижеприведенном изображении:

    9

    Стоит отметить, что на разнообразных графиках знаки переноса строчек, добавленные при помощи формулы, будут выводиться стандартным образом. Иными словами, будет производиться разбитие текстовой строчки на 2 и более.

    Деление на столбцы по переносу строки

    Если юзер в подразделе «Данные» выберет элемент «Текст по столбцам», то он сможет реализовать перенос строчек и разделение тестовой информации на несколько ячеек. Процесс осуществляется при помощи комбинации «Alt+Enter». В окошке «Мастер распределения текста по столбцам» необходимо поставить галочку около надписи «другой» и ввести сочетание «Ctrl+J».

    10

    Если поставить галочку около надписи «Считать последовательные разделители одним», то можно реализовать «схлопывание» нескольких переносов строчек подряд. На конченом этапе щелкаем на «Далее». В итоге мы получим:

    11

    Деление на строки по Alt+Enter через Power Query

    Бывают ситуации, когда пользователю необходимо осуществить деление многострочной текстовой информации не на колонки, а на строчки.

    12

    Для реализации этой процедуры отлично подходит надстройка «Power Query», появившаяся в табличном редакторе с 2016 года. Подробная инструкция выглядит так:

    1. При помощи комбинации «Ctrl+T» преобразуем исходные данные в «умную» табличку. Альтернативный вариант – передвигаемся в подраздел «Главная» и кликаем ЛКМ на элемент «Форматировать как таблицу».
    2. Передвигаемся в подраздел «Данные» и щелкаем на элемент «Из таблицы/диапазона». Эта операция позволит импортировать табличку в инструмент «Power Query».

    13

    1. Производим выделение колонки с многострочной текстовой информацией. Передвигаемся в подраздел «Главная». Раскрываем перечень показателя «Разделить столбец» и кликаем ЛКМ на элемент «По разделителю».

    14

    1. Жмем на «ОК», чтобы подтвердить внесенные изменения. Готово!

    15

    Макрос для деления на строки по Alt+Enter

    Рассмотрим, как реализовать эту процедуру при помощи специального макроса. Производим открытие VBA при помощи комбинации клавиш «Alt+F11» на клавиатуре. В возникшем окошке жмем «Insert», а затем «Module». Сюда добавляем такой код:

    16

    Возвращаемся на рабочую область и выбираем поля, в которых располагается многострочная информация. Жмем комбинацию «Alt+F8» на клавиатуре, чтобы активировать созданный макрос.

    Выводы

    Исходя из текста статьи, можно заметить, что существует огромное количество способов, реализующих перенос строчки в табличном документе. Произвести эту процедуру можно при помощи формул, операторов, специальных инструментов и макросов. Каждый юзер сможет сам подобрать для себя наиболее удобный метод.

    Источник

    Информационный раздел

    Переносы строк могут появиться в тексте по разным причинам. Обычно возвраты каретки встречаются в рабочей книге, например, когда текст скопирован с веб-страницы, когда они уже есть в рабочей книге, полученной от клиента, или, когда мы сами добавляем их нажатием клавиш Alt+Enter.

    Какой бы ни была причина их появления, сейчас перед нами стоит задача удалить возвраты каретки, так как они мешают выполнять правильную выгрузку данных в формат CSV.

    При выгрузке одна строка превращается в несколько, что не позволит корректно загрузить данные на сайт. 

    excel-01

    УДАЛЯЕМ ВОЗВРАТЫ КАРЕТКИ

    1. Нажмите Ctrl+А, что бы выделить всю книгу или выделите нужные вам ячейки или столбцы.
    2. Нажмите Ctrl+H, что бы вызвать диалоговое окно Найти и заменить (Find and Replace).
    3. Поставьте курсор в поле Найти (Find what) и нажмите Ctrl+J.

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

      excel-02

    4. В поле Заменить на (Replace With) введите любое значение для вставки вместо возвратов каретки. Обычно для этого используют пробел, чтобы избежать случайного склеивания двух соседних слов. Если нужно просто удалить переносы строк, оставьте поле Заменить на (Replace With) пустым.

    НЕ ЗАБУДЬТЕ ПРОВЕРИТЬ ФАЙЛ И НА ДРУГИЕ СПЕЦ. СИМВОЛЫ:

    • удалите все символы ; 
    • замените двойные пробелы на одинарные (несколько раз)

    « Вернуться

    Понравилась статья? Поделить с друзьями:
  • Excel как убрать разлиновку
  • Excel как убрать округление в ячейке чисел
  • Excel как убрать разделитель групп разрядов
  • Excel как убрать округление в формуле
  • Excel как убрать разделение по страницам