I don't know where is the problem...
You need to know
Microsoft Excel Objects[
^], especially: borders, font, interior.
In VB:
xlRange = xlWorkSheet.Range("A1:A5")
xlRange.Borders.LineStyle = xlDouble
xlRange.Borders(xlEdgeBottom).Color = vbRed
xlRange.Font.Bold = True
xlRange.Interior.ColorIndex = vbYellow
And a little tip:
Copying data from recordset, try to use MS Excel method for Worksheet:
xlWorksheet.Range("A1").CopyFromRecordset (objRecordset)
It's much, much quickest then copying it in the
for ... to... next
loop.
That's all!