InsideColor Property
Returns or sets the 24-bit color of the inside borders. Can be any valid WdColor constant or a value returned by Visual Basic's RGB function. Read/write.
WdColor can be one of these WdColor constants. |
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 Required. An expression that returns a Border object.
Remarks
If the InsideLineStyle property is set to either wdLineStyleNone or False, setting this property has no effect.
Example
This example adds borders between rows and between columns in the first table of the active document, and then it sets the colors for both the inside and outside borders.
If ActiveDocument.Tables.Count >= 1 Then
Set myTable = ActiveDocument.Tables(1)
With myTable.Borders
.InsideLineStyle = True
.InsideColor = wdColorBlueGray
.OutsideColor = wdColorPink
End With
End If
This example adds dark red borders between the first four paragraphs in the active document.
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