Word VBA教程:Condition方法

返回一个ConditionalStyle对象,该对象表示部分表格的特殊样式格式。

expression.Condition(ConditionCode)

expression   必需。该表达式返回“应用于”列表中的一个对象。

ConditionCode  WdConditionCode,必需。应用格式的部分表格。

WdConditionCode 可以是下列 WdConditionCode 常量:
wdEvenColumnBanding  将格式应用于偶数列。
wdEvenRowBanding  将格式应用于偶数行。
wdFirstColumn  将格式应用于表格中的第一列。
wdFirstRow  将格式应用于表格中的第一行。
wdLastColumn  将格式应用于表格中的最后一列。
wdLastRow  将格式应用于表格中的最后一行。
wdNECell  将格式应用于第一行中的最后一个单元格。
wdNWCell  将格式应用于第一行中的第一个单元格。
wdOddColumnBanding  将格式应用于奇数列。
wdOddRowBanding  将格式应用于奇数行。
wdSECell  将格式应用于表格中最后一个单元格。
wdSWCell  将格式应用于表格中最后一行的第一个单元格。

VBA示例

本示例选定活动文档中的第一个表格,并为奇数列添加百分之二十的底纹。


Sub TableStylesTest()
    With ActiveDocument
        'Select the table to which the conditional
        'formatting will apply
        .Tables(1).Select
        'Specify the conditional formatting
        .Styles("Table Grid").Table _
            .Condition(wdOddColumnBanding).Shading _
            .BackgroundPatternColor = wdColorGray20
    End With
End Sub

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号