Table.AutoFormat-Methode (Word)

Weist einer Tabelle ein vordefiniertes Aussehen zu.

Syntax

expression. AutoFormat( _Format_ , _ApplyBorders_ , _ApplyShading_ , _ApplyFont_ , _ApplyColor_ , _ApplyHeadingRows_ , _ApplyLastRow_ , _ApplyFirstColumn_ , _ApplyLastColumn_ , _AutoFit_ )

Ausdruck: Erforderlich. Eine Variable, die ein Table-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Format Optional Variant Das anzuwendende Format. Bei diesem Parameter kann es sich um eine WdTableFormat-Konstante , eine WdTableFormatApply-Konstante oder ein TableStyle-Objekt handeln.
ApplyBorders Optional Variant True, um die Eigenschaften für den Rahmen des angegebenen Formats zu übernehmen. Der Standardwert ist True.
ApplyShading Optional Variant True, um die Eigenschaften für die Schattierung des angegebenen Formats zu übernehmen. Der Standardwert ist True.
ApplyFont Optional Variant True, um die Eigenschaften für die Schriftart des angegebenen Formats zu übernehmen. Der Standardwert ist True.
ApplyColor Optional Variant True, um die Eigenschaften für die Farbe des angegebenen Formats zu übernehmen. Der Standardwert ist True.
ApplyHeadingRows Optional Variant True, um die Eigenschaften für die Kopfzeile des angegebenen Formats zu übernehmen. Der Standardwert ist True.
ApplyLastRow Optional Variant True, um die Eigenschaften für die letzte Zeile des angegebenen Formats zu übernehmen. Der Standardwert ist False.
ApplyFirstColumn Optional Variant True, um die Eigenschaften für die erste Spalte des angegebenen Formats zu übernehmen. Der Standardwert ist True.
ApplyLastColumn Optional Variant True, um die Eigenschaften für die letzte Spalte des angegebenen Formats zu übernehmen. Der Standardwert ist False.
AutoFit Optional Variant True, wenn die Breite der Tabellenspalten so weit wie möglich verkleinert werden soll, ohne die Art zu ändern, wie der Text in den Zellen umbrochen wird. Der Standardwert ist True.

HinwBemerkungeneise

Die Argumente für diese Methode entsprechen den Optionen im Dialogfeld Tabelle AutoFormat.

Beispiel

In diesem Beispiel werden in einem neuen Dokument eine 5x5-Tabelle erstellt und der Tabelle alle Eigenschaften des Formats Farbig 2 zugewiesen.

Set newDoc = Documents.Add 
Set myTable = newDoc.Tables.Add(Range:=Selection.Range, _ 
 NumRows:=5, NumColumns:=5) 
myTable.AutoFormat Format:=wdTableFormatColorful2

In diesem Beispiel werden der Tabelle, in der sich momentan die Einfügemarke befindet, alle Eigenschaften des Formats Standard 2 zugewiesen. Wenn sich die Einfügemarke nicht in einer Tabelle befindet, wird ein Meldungsfeld angezeigt.

Selection.Collapse Direction:=wdCollapseStart 
If Selection.Information(wdWithInTable) = True Then 
 Selection.Tables(1).AutoFormat Format:=wdTableFormatClassic2 
Else 
 MsgBox "The insertion point is not in a table." 
End If

Siehe auch

Table-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.