Borders Collection Object

                  Properties                 

A collection of four Border objects that represent the four borders of a Range or Style object.

Using the Borders Collection

Use the Borders property to return the Borders collection, which contains all four borders. The following example adds a double border to cell A1 on worksheet one.

Worksheets(1).Range("a1").Borders.LineStyle = xlDouble

Use Borders(index), where index identifies the border, to return a single Border object. The following example sets the color of the bottom border of cells A1:G1 to red.

Worksheets("Sheet1").Range("a1:g1"). _
    Borders(xlEdgeBottom).Color = RGB(255, 0, 0)

Index can be one of the following XlBordersIndex constants: xlDiagonalDown, xlDiagonalUp, xlEdgeBottom, xlEdgeLeft, xlEdgeRight, or xlEdgeTop, xlInsideHorizontal, or xlInsideVertical.

Remarks

You can set border properties for an individual border only with Range and Style objects. Other bordered objects, such as check boxes and chart areas, have a border that’s treated as a single entity, regardless of how many sides it has. For these objects, you must return and set properties for the entire border as a unit. For more information, see the Border object.