| Index | XlBordersIndex |
Workbook.Worksheets[1].Range['A1', 'G1'].Borders.Item[xlEdgeBottom].Color := RGB(255, 0, 0);
Workbook.Worksheets[1].Range['A1', 'G1'].Borders[xlEdgeBottom].Color := RGB(255, 0, 0);
with Workbook.Worksheets[1].Range['A1', 'D4'].Borders[xlAround] do begin ColorIndex:=3; Weight:=xlThick; end;