TableStyle.ColumnStripe-Eigenschaft (Word)
Gibt einen Long-Wert zurück, der die Spaltenanzahl für den Spaltenverbund repräsentiert, wenn in einer Formatvorlage geradzahlige und ungeradzahlige Spaltenverbünde definiert sind, oder legt ihn fest. Lese-/Schreibzugriff.
Syntax
Ausdruck. ColumnStripe
Ausdruck Eine Variable, die ein TableStyle-Objekt darstellt.
Hinweise
Verwenden Sie die Condition-Methode , um die Geraden- oder Ungeraden-Spalten für eine Tabellenformatvorlage festzulegen.
Beispiel
Im folgenden Beispiel wird eine neue Tabellenformatvorlage erstellt und formatiert, die dann auf eine neue Tabelle angewendet wird. Durch diese Formatvorlage werden nach jeder dritten Spalte drei Spalten und nach zweiten Zeile zwei Zeilen mit einer 20%-Schattierung versehen.
Sub NewTableStyle()
Dim styTable As Style
With ActiveDocument
Set styTable = .Styles.Add(Name:="TableStyle 1", _
Type:=wdStyleTypeTable)
With .Styles("TableStyle 1").Table
.Condition(wdEvenColumnBanding).Shading _
.Texture = wdTexture20Percent
.ColumnStripe = 3
.Condition(wdEvenRowBanding).Shading _
.Texture = wdTexture20Percent
.RowStripe = 2
End With
With .Tables.Add(Range:=Selection.Range, NumRows:=15, _
NumColumns:=15)
.Style = ActiveDocument.Styles("TableStyle 1")
End With
End With
End Sub
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.