Как скопировать таблицы Word в Excel, не разбивая ячейки на несколько строк?

33

У меня есть данные в таблице Word, которая включает разрывы строк и абзацев. Когда я копирую данные в Excel, они разбивают каждую нужную строку и абзац на несколько ячеек. Как скопировать данные в Excel и сохранить перерывы?

skia.heliou
источник

Ответы:

39

Вам придется немного заменить персонажа. Это довольно просто исправить.

В слове:

  1. Выберите всю таблицу в Word.
  2. Откройте диалоговое окно «Найти и заменить» (например, набрав Ctrl+ H).
  3. В поле «Найти что» введите ^l. Это выберет все разрывы строк.
    • Вы можете выбрать разрывы абзацев, введя ^p.
  4. В поле «Заменить» введите ^v.
    • Это сокращение для символа абзаца ¶, также известного как «Пилкроу».
    • Вы можете заменить метки абзаца двумя подушками для облегчения замены позже.
  5. Нажмите «Заменить все».
  6. Скопируйте данные таблицы в буфер обмена.

В Excel:

  1. Вставьте вашу таблицу в нужное место в Excel.
  2. С выбранными табличными данными откройте диалоговое окно «Найти и заменить» (снова Ctrl+ Hработает).
  3. В поле «Найти что» введите следующий код Alt: Alt+ 0182. Появляется крыса.
    • Чтобы ввести Alt-код, удерживайте Altклавишу при вводе цифр на цифровой клавиатуре. Это может помочь иметь Num Lockна.
  4. В поле «Заменить» введите следующий код Alt: Alt+ 0010.
    • Этот код входит в одну строку. Ничего не появляется, хотя ваш курсор может измениться.
  5. Нажмите «Заменить все».

Ссылки:

skia.heliou
источник
Этот ответ (с банальными косметическими отличиями) появился на сайте Microsoft.com в разделе Сохранение многострочных ячеек при вставке таблицы Word в Excel . И, кстати, я считаю, что (Alt) +010 достаточно хорошо; Мне не нужны два ведущих нуля.
G-Man говорит: «Восстановите Монику»
@ G-Man Ха ... если бы я только нашел это раньше! Жаль, что я не работал в Office 2007 в то время. Кроме того, вы имеете в виду ведущий один ноль (Alt + 010) или первые два (Alt + 10)?
skia.heliou
Спасибо - я выполнил все шаги для работы на Mac (в Excel 15), кроме последнего - мне не удалось ввести alt-0010 или разрыв строки. Какие-либо предложения? Я попытался скопировать и вставить разрыв строки из другого источника, а также несколько других приемов.
Джей Кросслер
Office 2013 здесь, это не работает. По-прежнему получать несколько строк в Excel после замены.
Нил
17

Есть более простой способ.

Если у вас есть учетная запись Google Gmail, вы можете открыть Google Диск и создать новую электронную таблицу, а затем скопировать всю таблицу из Microsoft Word в электронную таблицу Google. Как только вы получите его в нужном формате, вы можете скопировать таблицу в Microsoft Excel.

Абе Басани
источник
5
... или ... просто оставь это в Драйве :)
GreenAsJade
Мне пришлось скопировать из Word в Google Doc, а затем из Google Doc в Google Sheet (иначе разрывы строк исчезнут). +1 в любом случае
user2518618
1

Я обнаружил, что вы можете использовать LibreOffice Calc.

  1. Выберите таблицу Word
  2. копия
  3. В LibreOffice Calc вставьте специальные как HTML
  4. Сохранить в своем любимом формате

Ваш стол не будет разбит на несколько ячеек.

пирс
источник
Хорошо работает, чтобы попасть в LibreOffice Calc. А затем перейти из Calc в Excel: 1. выберите таблицу Calc 2. Скопируйте 3. В Microsoft Excel вставьте Special as DIF
Пол Гобе
0

Я сделал функцию vba для удаления новой строки, которая делала ячейки в Excel перед копированием в Excel.

sub RemoveNewLinesFromTabelCells (tblnumber как целое число)
удалить новую строку из каждой ячейки выбранной таблицы по номеру таблицы
  dim x как долго, y как долго, countcount как долго, rowcount как долго
  columncount = Activedocument.Tables (tblNumber) .Range.Columns.Count
  rowcount = Activedocument.Tables (tblNumber) .Range.Rows.Count
  для х = 1 до количества строк
     для y = 1 к столбцу count
        ActiveDocument.Tables (tblNumber) .cell (x, y) .Range.Text = Replace (ActiveDocument.TAbles (tblNumber) .cell (x, y) .Range.Text, Chr (13, "")
     следующий у
  следующий х
конец суб
codecaine
источник