Wie kopiere ich Word-Tabellen in Excel, ohne Zellen in mehrere Zeilen aufzuteilen?

33

Ich habe Daten in einer Word-Tabelle, die Zeilen- und Absatzumbrüche enthält. Wenn ich die Daten in Excel kopiere, werden die gewünschten Zeilen und Absätze in mehrere Zellen aufgeteilt. Wie kopiere ich die Daten nach Excel und behalte die Pausen?

microsoft-excel microsoft-word

— skia.heliou
quelle

39

Sie müssen ein wenig Zeichen ersetzen. Es ist eine ziemlich einfache Lösung.

In Worten:

Wählen Sie Ihre gesamte Tabelle in Word aus.
Öffnen Sie das Dialogfeld "Suchen und Ersetzen" (z. B. durch Eingabe von Ctrl+ H).
Geben Sie im Feld "Suchen nach" Folgendes ein ^l. Dadurch werden alle Zeilenumbrüche ausgewählt.
- Sie können Absatzumbrüche durch Eingabe auswählen ^p.
Geben Sie in das Feld "Ersetzen durch" ein ^v.
- Dies ist eine Abkürzung für das Absatzsymbol ¶, das auch als "Pilcrow" bezeichnet wird.
- Möglicherweise möchten Sie Absatzmarken durch zwei Pfeilzeichen ersetzen, um sie später leichter ersetzen zu können.
Klicken Sie auf "Alle ersetzen".
Kopieren Sie die Tabellendaten in die Zwischenablage.

In Excel:

Fügen Sie Ihre Tabelle an der gewünschten Stelle in Excel ein.
Öffnen Sie bei ausgewählten Tabellendaten das Dialogfeld "Suchen und Ersetzen" (wieder Ctrl+ Hfunktioniert).
Geben Sie im Feld "Suchen nach" den folgenden Alt-Code ein: Alt+ 0182. Ein Pilger erscheint.
- Um einen Alt-Code einzugeben, halten Sie die AltTaste gedrückt, während Sie die Ziffern auf dem Ziffernblock eingeben. Es kann helfen, auf zu haben Num Lock.
Geben Sie im Feld Ersetzen den folgenden Alt-Code ein: Alt+ 0010.
- Dieser Code wird in einem einzelnen Zeilenumbruch eingegeben. Es wird nichts angezeigt, obwohl sich der Cursor möglicherweise ändert.
Klicken Sie auf "Alle ersetzen".

Verweise:

— skia.heliou
quelle

Diese Antwort (mit geringfügigen kosmetischen Unterschieden) wurde auf Microsoft.com unter Mehrzeilige Zellen beibehalten beim Einfügen einer Word-Tabelle in Excel angezeigt . Übrigens finde ich, dass (Alt) +010 gut genug ist; Ich brauche die beiden führenden Nullen nicht.

— G-Man sagt, dass Monica am

@ G-Man Ha ... wenn ich das nur früher gefunden hätte! Schade, dass ich zu diesem Zeitpunkt nicht in Office 2007 gearbeitet habe. Meinen Sie auch die führende Null (Alt + 010) oder die führenden zwei (Alt + 10)?

— skia.heliou

Danke - Ich habe alle Schritte für die Arbeit auf einem Mac (in Excel 15) ausgeführt, mit Ausnahme des letzten Schritts - Ich konnte weder den Alt-0010 noch einen Zeilenumbruch eingeben. Irgendwelche Vorschläge? Ich habe versucht, einen Zeilenumbruch aus einer anderen Quelle sowie einige andere Tricks zu kopieren und einzufügen.

— JayCrossler

Office 2013 hier funktioniert das nicht. Immer noch mehrere Zeilen in Excel nach dem Ersetzen.

— Neil

17

Es gibt einen einfacheren Weg.

Wenn Sie über ein Google Mail-Konto verfügen, können Sie Google Drive öffnen, eine neue Tabelle erstellen und dann die gesamte Tabelle von Microsoft Word in die Google-Tabelle kopieren. Sobald Sie es im gewünschten Format haben, können Sie die Tabelle in Microsoft Excel kopieren.

— Abe Basani
quelle

5

... oder ... lass es einfach in Drive :)

— GreenAsJade

Ich musste von Word nach Google Doc und dann von Google Doc nach Google Sheet kopieren (sonst würden die Zeilenumbrüche verschwinden). +1 sowieso

— user2518618

1

Ich habe festgestellt, dass Sie LibreOffice Calc verwenden können.

Wählen Sie Ihre Word-Tabelle
Kopieren
Fügen Sie in LibreOffice Calc Inhalte als HTML ein
Speichern Sie in Ihrem Lieblingsformat

Ihre Tabelle wird nicht in mehrere Zellen aufgeteilt.

— Seebrücke
quelle

Funktioniert gut, um in LibreOffice Calc zu kommen. Um von Calc nach Excel zu gelangen, gehen Sie wie

— folgt vor

0

Ich habe eine VBA-Funktion erstellt, um Zeilenumbrüche zu entfernen, die dazu führten, dass die Zellen in Excel geteilt wurden, bevor sie in Excel kopiert wurden.

sub RemoveNewLinesFromTabelCells (tblnumber as integer)
'Zeilenumbruch aus jeder Zelle der ausgewählten Tabelle nach Tabellennummer entfernen
  dim x so lang, y so lang, columncount so lang, rowcount so lang
  columncount = Activedocument.Tables (tblNumber) .Range.Columns.Count
  rowcount = Activedocument.Tables (tblNumber) .Range.Rows.Count
  für x = 1 zur Zeilenzählung
     für y = 1 bis Spaltenanzahl
        ActiveDocument.Tables (tblNumber) .cell (x, y) .Range.Text = Ersetzen (ActiveDocument.TAbles (tblNumber) .cell (x, y) .Range.Text, Chr (13, "")
     als nächstes y
  nächstes x
End Sub

— Codecain
quelle