Código Delphi
[-]
Uses Excel2000
....
var
Excel, Libro: Variant;
...
Excel:=CreateOleObject('Excel.Application');
Excel.Visible := False;
Excel.DisplayAlerts:= False;
Excel.WorkBooks.Add;
Excel.WorkBooks[1].WorkSheets[1].Name := 'Reporte';
Libro := Excel.WorkBooks[1].WorkSheets['Reporte'];
Libro.Cells[1,1]:='Reporte';
.....
Libro.Cells[i,4].Font.Bold:=True;
Libro.Range['A'+inttostr(i-1), 'E'+inttostr(i-1)].Merge;
Libro.Range['A'+inttostr(i-1), 'E'+inttostr(i-1)].Borders[xlBottom].weight := xlMedium;
Libro.Range['A'+inttostr(i+1), 'E'+inttostr(i+1)].Merge;
Libro.Range['A'+inttostr(i+1), 'E'+inttostr(i+1)].Borders[xlTop].weight := xlMedium;
Excel.Visible:=true;
Libro:=Unassigned;
Excel := Unassigned;
Con eso creas un archivo de excel nuevo y ahí viene el ejemplo de como poner bordes.