LineStyle Property

expression.LineStyle

expression    Required. An expression that returns one of the objects in the Applies To list.

Remarks

You cannot set this property for a ChBorder object that represents a chart element.

Example

This example puts a green dash-dot border around each cell in the range A1:E5.

Sub SetBorder()

   Dim rngCurrent
   Dim ssConstants

   Set ssConstants = Spreadsheet1.Constants

   Set rngCurrent = Spreadsheet1.Range("a1:e5")

   rngCurrent.Borders.LineStyle = ssConstants.ssConstants.xlDashDot

   rngCurrent.Borders.Color = "Green"

End Sub