Formatting Output in Excel

[Alkemac]

If I export a data grid to Excel, how do I format the data ? ie I wish to put a border around the outside, make the top row of the grid grey background etc?

Thanks

 

[combo]

Use OLE automation (set reference to excel object library first):

Dim xlApp as Excel.Application
Dim xlWbk as Excel.Workbook
Set xlApp=CerateObject("Excel.Application&quot
Set xlWbk=xlApp.Workbooks.Open "Your Saved File Here"

Open your workbook, record formatting (Tools>Macro>Record new macro...), clear code, particularly change "Selection" to range references. Refer the code to xlWbk object.

Save workbook (xlWbk.Save).
Quit excel (xlApp.Quit).
Destroy objects (Set xlApp=Nothing).

combo