BorderAround Method
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.
Adds a border to a range and sets the Color, LineStyle, and Weight properties for the new border.
expression.BorderAround(LineStyle, Weight, ColorIndex, Color)
expression Required. An expression that returns a Range object.
XlLineStyle
XlLineStyle can be one of these XlLineStyle constants. |
xlContinuousdefault |
xlDash |
xlDashDot |
xlDashDotDot |
xlDot |
XlBorderWeight
XlBorderWeight can be one of these XlBorderWeight constants. |
xlHairline |
xlMedium |
xlThick |
xlThindefault |
XlColorIndex
XlColorIndex can be one of these XlColorIndex constants. |
xlColorIndexAutomaticdefault |
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, the default line style and weight are used.
Example
This example adds a thick red border around the range A1:D4 on Sheet1.
Sub Add_Border()
Dim ssConstants
Set ssConstants = Spreadsheet1.Constants
Spreadsheet1.Worksheets("Sheet1").Range("A1:D4") _
.BorderAround , ssConstants.xlThick, 3
Enb Sub