BorderAround Method Example
This example adds a thick red border around the range A1:D4 on Sheet1.
Worksheets("Sheet1").Range("A1:D4").BorderAround _ ColorIndex:=3, Weight:=xlThick