Liz hat mehrere Dokumente mit jeweils mehreren Tabellen, die Inhalte enthalten.

Diese Tabellen sind einfache zweispaltige Tabellen mit unterschiedlicher Anzahl von Zeilen.

Derzeit variieren die Spaltenbreiten der Tabellen je nach Inhalt. Liz möchte, dass alle Tabellen die gleichen Spaltenbreiten haben (z. B. 5,25 „für die erste Spalte und 1,25“ für die zweite Spalte).

Sie fragt sich, ob es eine andere Möglichkeit gibt, dies zu erreichen, als die Spaltenbreiten für jede Tabelle einzeln festzulegen.

Wenn es sich, wie Liz beschreibt, um vorhandene Dokumente handelt, die eine Reihe von Tabellen enthalten, besteht die einzige Möglichkeit, diese Aufgabe auszuführen, in der Verwendung eines Makros.

Die zu verwendende Technik wurde tatsächlich in einem anderen WordTip beschrieben, den Sie hier finden:

`link:/office-skill-de/wordribbon-T011693

Während die in diesem Tipp beschriebene Technik auf Liz ‚Situation anwendbar ist, kann sie durch einfache Änderungen noch besser angewendet werden. Zum Beispiel gibt Liz an, dass alle Tabellen zwei Spalten haben. Wenn es jedoch (aus irgendeinem Grund) eine oder zwei Tabellen mit einer unterschiedlichen Anzahl von Spalten gibt, kann ein Makro, das zwei Spalten erwartet, diese anderen Tabellen zerstören. Betrachten Sie dieses Makro, das einfach jede Tabelle mit einer anderen Anzahl von Spalten überspringt:

Sub SetTableWidths()

Dim t As Table     Dim iFixed As Integer     Dim iSkipped As Integer     Dim sTemp As String

iFixed = 0     iSkipped = 0     For Each t In ActiveDocument.Tables         If t.Columns.Count = 2 Then             t.Columns(1).Width = InchesToPoints(5.25)

t.Columns(2).Width = InchesToPoints(1.25)

iFixed = iFixed + 1         Else             iSkipped = iSkipped + 1         End If     Next t     sTemp = "Tables Fixed: " & iFixed & vbCr     sTemp = sTemp & "Tables Skipped: " & iSkipped     MsgBox sTemp End Sub

Wenn Sie das Makro ausführen, wird die Breite aller zweispaltigen Tabellen im Dokument angepasst. Nach Abschluss wird die Anzahl der festen Tabellen (die Anzahl der zweispaltigen Tabellen) und die Anzahl der übersprungenen Tabellen (die weniger oder mehr Spalten als zwei hatten) angezeigt.

Dieser makrobasierte Ansatz eignet sich hervorragend für Dokumente, in denen bereits Tabellen enthalten sind. Wenn Sie jedoch neue Dokumente erstellen, sollten Sie eine „Standard“ -Tabelle erstellen und als Baustein speichern.

Dies macht es sehr einfach, eine solche Tabelle in Ihr Dokument einzufügen, während Sie es entwickeln. Die Art und Weise, wie Sie dies tun, wird in einem anderen WordTip behandelt:

T006076

_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.

WordTipsMacros [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 (13749) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365.