通过

Word) (Border.ColorIndex 属性

  • 项目

返回或设置指定边框或字体的颜色。 读/写 WdColorIndex 。

语法

expression.ColorIndex

表达式是必需的。 表示“Border”对象的变量。

备注

WdByAuthor 常量无效为边框和字体对象。

示例

本示例为第一个表格的每个单元格添加红虚线边框。

Dim borderLoop As Border 
 
If ActiveDocument.Tables.Count >= 1 Then 
 For Each borderLoop In ActiveDocument.Tables(1).Borders 
 With borderLoop 
 .ColorIndex = wdRed 
 .LineStyle = wdLineStyleDashDot 
 .LineWidth = wdLineWidth075pt 
 End With 
 Next borderLoop 
End If

另请参阅

Border 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。