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 can be one of these XlLineStyle constants.|
|XlBorderWeight can be one of these XlBorderWeight constants.|
|XlColorIndex can be one of these XlColorIndex constants.|
Color Optional Variant. The border color, as an RGB value.
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.
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