This example adds a medium-weight green border to each cell in the range B5:C10 on the spreadsheet.
Set c = Spreadsheet1.Constants
Spreadsheet1.Range("b5:c10").Borders.Weight = c.owcLineWeightMedium
Spreadsheet1.Range("b5:c10").Borders.Color = "green"