InsideColor Property

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