This example adds a medium-weight green border to each cell in the range B5:C10 on the spreadsheet. Because named constants are not available in VBScript, the example sets a variable to the object returned by the Constants property.
Set c = Spreadsheet1.Constants
Spreadsheet1.Range("b5:c10").Borders.Weight = c.owcLineWeightMedium
Spreadsheet1.Range("b5:c10").Borders.Color = "green"