返回或设置内部边框的 24 位颜色。可取任何有效的 WdColor 常量或 Visual Basic 的 RGB 函数的返回值。可读写。
WdColor 可以是下列 WdColor 常量之一: |
wdColorGray625 |
wdColorGray70 |
wdColorGray80 |
wdColorGray875 |
wdColorGray95 |
wdColorIndigo |
wdColorLightBlue |
wdColorLightOrange |
wdColorLightYellow |
wdColorOliveGreen |
wdColorPaleBlue |
wdColorPlum |
wdColorRed |
wdColorRose |
wdColorSeaGreen |
wdColorSkyBlue |
wdColorTan |
wdColorTeal |
wdColorTurquoise |
wdColorViolet |
wdColorWhite |
wdColorYellow |
wdColorAqua |
wdColorAutomatic |
wdColorBlack |
wdColorBlue |
wdColorBlueGray |
wdColorBrightGreen |
wdColorBrown |
wdColorDarkBlue |
wdColorDarkGreen |
wdColorDarkRed |
wdColorDarkTeal |
wdColorDarkYellow |
wdColorGold |
wdColorGray05 |
wdColorGray10 |
wdColorGray125 |
wdColorGray15 |
wdColorGray20 |
wdColorGray25 |
wdColorGray30 |
wdColorGray35 |
wdColorGray375 |
wdColorGray40 |
wdColorGray45 |
wdColorGray50 |
wdColorGray55 |
wdColorGray60 |
wdColorGray65 |
wdColorGray75 |
wdColorGray85 |
wdColorGray90 |
wdColorGreen |
wdColorLavender |
wdColorLightGreen |
wdColorLightTurquoise |
wdColorLime |
wdColorOrange |
wdColorPink |
expression.InsideColor
expression 必需。该表达式返回一个 Border 对象。
如果将 InsideLineStyle 属性设置为 wdLineStyleNone 或 False,则本属性的设置不产生任何效果。
本示例在活动文档第一个表格的行列之间添加边框,然后设置内部和外部边框的颜色。
If ActiveDocument.Tables.Count >= 1 Then
Set myTable = ActiveDocument.Tables(1)
With myTable.Borders
.InsideLineStyle = True
.InsideColor = wdColorBlueGray
.OutsideColor = wdColorPink
End With
End If
本示例在活动文档的前四个段落之间添加深红色边框。
Set myDoc = ActiveDocument
Set myRange = myDoc.Range(Start:=myDoc.Paragraphs(1).Range.Start, _
End:=myDoc.Paragraphs(4).Range.End)
With myRange.Borders
.InsideLineStyle = wdLineStyleSingle
.InsideLineWidth = wdLineWidth150pt
.InsideColor = wdDarkRed
End With