Table.AutoFormat-Methode (Word)
Weist einer Tabelle ein vordefiniertes Aussehen zu.
Syntax
expression.
AutoFormat( _Format_ , _ApplyBorders_ , _ApplyShading_ , _ApplyFont_ , _ApplyColor_ , _ApplyHeadingRows_ , _ApplyLastRow_ , _ApplyFirstColumn_ , _ApplyLastColumn_ , _AutoFit_ )
expression 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. |
Hinweise
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
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.