用指定的表格样式设置选定表格的格式时,该对象代表应用于表格中指定区域的特殊格式。
备注
使用 TableStyle 对象的 条件 方法返回一个 ConditionalStyle 对象。 底纹 属性可以用于将底纹应用于表的指定区域。 本示例选定活动文档中的第一个表格,并将底纹应用于备用的行和列。 本示例假定活动文档中存在一个表和它的格式使用网格型样式。
Sub ApplyConditionalStyle()
With ActiveDocument
.Tables(1).Select
With .Styles("Table Grid").Table
.Condition(wdOddColumnBanding).Shading _
.BackgroundPatternColor = wdColorGray10
.Condition(wdOddRowBanding).Shading _
.BackgroundPatternColor = wdColorGray10
End With
End With
End Sub
使用 边框 属性应用于表中的指定区域的边框。 本示例选定活动文档中的第一个表格,并将边框应用于第一行和最后一行和第一列。 本示例假定活动文档中存在一个表和它的格式使用网格型样式。
Sub ApplyTableBorders()
With ActiveDocument
.Tables(1).Select
With .Styles("Table Grid").Table
.Condition(wdFirstRow).Borders(wdBorderBottom) _
.LineStyle = wdLineStyleDouble
.Condition(wdFirstColumn).Borders(wdBorderRight) _
.LineStyle = wdLineStyleDouble
.Condition(wdLastRow).Borders(wdBorderTop) _
.LineStyle = wdLineStyleDouble
End With
End With
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。