Export (0) Print
Expand All

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 can be one of these XlLineStyle constants.
xlContinuous default
xlDash
xlDashDot
xlDashDotDot
xlDot

XlBorderWeight can be one of these XlBorderWeight constants.
xlHairline
xlMedium
xlThick
xlThin default

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, 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

 

Show:
© 2014 Microsoft