Tabellen sind ein großer Segen für Benutzer von Word. Wenn Sie mit Dokumenten arbeiten, die in einem anderen Textverarbeitungsprogramm erstellt wurden, können Tabellen jedoch störend sein. Zum Beispiel beschwerte sich ein WordTips-Leser, dass sein zweispaltiger Text, der in einem anderen Textverarbeitungsprogramm erstellt wurde, in Word in Tabellen konvertiert wurde. Er bat um eine Möglichkeit, alle Tabellen automatisch in Text umzuwandeln, ohne dass jede Tabelle manuell verarbeitet werden muss.

Das folgende Makro, AllTablesToText, erledigt den Trick. Es durchläuft jede Tabelle im aktuellen Dokument und konvertiert sie alle in Text mit Registerkarten zwischen den Spalten:

Sub AllTablesToText()

Dim t As Table

For Each t in ActiveDocument.Tables         t.ConvertToText Separator:=wdSeparateByTabs     Next t End Sub

Wenn Sie keine Tabulatoren zwischen den Spalten möchten, müssen Sie lediglich den dem Separator-Parameter zugewiesenen Wert ändern. Sie können wdSeparateByCommas, wdSeparateByDefaultListSeparator oder wdSeparateByParagraphs verwenden.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (13171) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365. Eine Version dieses Tipps finden Sie für ältere Menüoberfläche von Word hier:

Tabellen in Text konvertieren.