У меня есть текст в отдельных строках внутри одного окна, Как сделать все это в одной строке - PullRequest
0 голосов
/ 30 марта 2019

Часть моего текста в разных строках внутри одной ячейки.Я хочу их в одну строку.Как привести их в одну строку?

Пример: первая ячейка содержит:

Hi Ram, I want to go to movie today.
Are you willing to join?
If yes, let me know early.

Пример:

Ожидаемый результат:

Hi Ram, I want to go to movie today.Are you willing to join?If yes, let me know early.

Ответы [ 3 ]

1 голос
/ 30 марта 2019

Новая строка в ячейке A1, вызванная, например, alt + Enter, может быть удалена с помощью формулы, например:

=SUBSTITUTE(A1,CHAR(10)," ")

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

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

Другой тип переноса строки - CHAR (13).Вы можете удалить CHAR (13), снова используя ту же функцию:

=SUBSTITUTE(SUBSTITUTE(A1, CHAR(13)," "), CHAR(10), " ")

Если у вас уже есть пробелы перед символом новой строки, вам нужно обернуть приведенную выше формулу в функцию TRIM следующим образом:

=TRIM(SUBSTITUTE(A1,CHAR(10)," "))

ИЛИ

=TRIM(SUBSTITUTE(SUBSTITUTE(A1,CHAR(13)," "),CHAR(10)," "))

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

Примечание-1:

char (13) официально называется «возврат каретки», а char (10) называется «перевод строки».

CHAR (10) возвращает строкуbreak в Windows, а CHAR (13) возвращает разрыв строки в Mac.Этот ответ для Windows.Вы не можете видеть это визуально, но вы можете видеть его эффект.

Примечание-2:

Когда @ kojow7 ответил, перенос текста может вызвать появление текстаболее чем на 1 строку в зависимости от ширины ячейки и длины текста.Этот ответ не разрешает этот случай.

Связанное обсуждение можно найти здесь: Удалить разрывы строк из ячейки .

0 голосов
/ 30 марта 2019

В зависимости от вашего документа он может содержать перевод строки или возврат каретки или ОБА.

Александр Фролов (https://www.ablebits.com/office-addins-blog/2013/12/03/remove-carriage-returns-excel/) написал очень хороший пост в блоге о различных методах поиска и удаления разрывов строк в Excelфайл. Мы будем использовать «макро» способ сделать это - так как он работает как на Windows, так и на Mac. Предлагаемый здесь метод поиска замены также будет работать не на Mac, а на Windows.

  • Добавьте приведенный ниже макрос в ваш документ (слегка измененный по сравнению с оригиналом)
  • Измените значение «ReplaceWith» с «» (пробел) на все, что вам нравится, чтобы заменить строку.
  • Например, ReplaceWith = «-» приведет к «Line1-Line2-Line3»
  • Запустить макрос («Дополнения»> «Макрос»), пока выбраны все ячейки.

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

Если ваши отдельные строки к настоящему времени не исчезли, пожалуйста, измените «LinefeedChar» с «Chr (10)» на «Chr (13)» и запустите его снова

0 голосов
/ 30 марта 2019

Здесь вам может понадобиться исправить две вещи: 1) Разрывы строк и 2) Перенос текста

Чтобы исправить разрывы строк:

  • Выберите ячейкикоторые нужно изменить
  • Нажмите CTRL + H, чтобы открыть Поиск и замену
  • В поле поиска введите CTRL + J, чтобы вставить символ переноса строки (может показаться, что ничего не было вставлено вполе, но оно вставляет разрыв строки)
  • Решите, заменять ли разрывы строк пробелом или не указывать ничего
  • Нажмите Заменить все

Чтобы отключить перенос текста:

  • Выберите ячейки, которые необходимо изменить
  • Перейдите на вкладку "Главная"
  • В группе выравнивания, чтобы увидетьесли нажата кнопка «Обернуть текст».
  • Если это так, нажмите на нее еще раз, чтобы отменить ее выбор.

В зависимости от ситуации может потребоваться исправить одно или оба изэто.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...