BorderAround Method

  • Article

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

Applies to | Range Object

See Also | Range Object