Auf Englisch lesen

Freigeben über


Style.Table-Eigenschaft (Word)

Gibt ein TableStyle-Objekt zurück, das Eigenschaften darstellt, die mithilfe einer Tabellenformatvorlage auf eine Tabelle angewendet werden können.

Syntax

Ausdruck. Table

Ausdruck Ein Ausdruck, der ein Style-Objekt zurückgibt.

Beispiel

In diesem Beispiel wird eine neue Tabellenformatvorlage erstellt, die nur für die erste und letzte Zeile sowie für die letzte Spalte einen umgebenden Rahmen, besondere Rahmen und eine Schattierung festlegt.

Sub NewTableStyle() 
 Dim styTable As Style 
 
 Set styTable = ActiveDocument.Styles.Add( _ 
 Name:="TableStyle 1", Type:=wdStyleTypeTable) 
 
 With styTable.Table 
 
 'Apply borders around table, a double border to the heading row, 
 'a double border to the last column, and shading to last row 
 .Borders(wdBorderTop).LineStyle = wdLineStyleSingle 
 .Borders(wdBorderBottom).LineStyle = wdLineStyleSingle 
 .Borders(wdBorderLeft).LineStyle = wdLineStyleSingle 
 .Borders(wdBorderRight).LineStyle = wdLineStyleSingle 
 
 .Condition(wdFirstRow).Borders(wdBorderBottom) _ 
 .LineStyle = wdLineStyleDouble 
 
 .Condition(wdLastColumn).Borders(wdBorderLeft) _ 
 .LineStyle = wdLineStyleDouble 
 
 .Condition(wdLastRow).Shading _ 
 .BackgroundPatternColor = wdColorGray125 
 
 End With 
End Sub

Siehe auch

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