BorderAround Method
Adds a border to a range and sets the Color, LineStyle, and Weight properties for the new border. Variant.
expression.BorderAround(LineStyle, Weight, ColorIndex, Color)
expression Required. An expression that returns one of the objects in the Applies To list.
LineStyle Optional XlLineStyle. The line style for the border.
XlLineStyle can be one of these XlLineStyle constants. |
xlContinuous default. |
xlDash |
xlDashDot |
xlDashDotDot |
xlDot |
xlDouble |
xlLineStlyeNone |
xlSlantDashDot |
xlLineStlyeNone |
Weight Optional XlBorderWeight. The border weight.
XlBorderWeight can be one of these XlBorderWeight constants. |
xlHairline |
xlMedium |
xlThick |
xlThin default |
ColorIndex Optional XlColorIndex. The border color, as an index into the current color palette or as a XlColorIndex constant.
XlColorIndex can be one of these XlColorIndex constants. |
xlColorIndexAutomatic default |
xlColorIndexNone |
Color Optional Variant. The border color, as an RGB value.
Remarks
You must specify either ColorIndex or Color, but not both.
You can specify either LineStyle or Weight, but not both. If you don't specify either argument, Microsoft Excel uses the default line style and weight.
This method outlines the entire range without filling it in. To set the borders of all the cells, you must set the Color, LineStyle, and Weight properties for the Borders collection. To clear the border, you must set the LineStyle property to xlLineStyleNone for all the cells in the range.
Example
This example adds a thick red border around the range A1:D4 on Sheet1.
Worksheets("Sheet1").Range("A1:D4").BorderAround _
ColorIndex:=3, Weight:=xlThick