Word) (TableStyle.RowStripe 屬性
會傳回或設定 Long ,代表要納入帶狀時樣式指定了奇數或偶數-列的列數。 讀取/寫入。
語法
expression。 RowStripe
表達 代表 'TableStyle' 物件的變數。
註解
使用 Condition 方法可設定奇數或偶數欄的帶狀為表格樣式。
範例
本範例會建立並格式化新表格樣式,然後將新樣式套用至新表格。 結果樣式會讓每三欄的第三個欄以及每兩列的第二個列都有 20% 的陰影。
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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。