Macro

[upaliwije]

Hi Firends

I have copied the following macro to my documents and it working fine

sub exportToExcel_Variant2

'// Array for export definitions

Dim aryExport(1,3)

aryExport(0,0) = "objTX02"

aryExport(0,1) = "Seylan_Card Summary"

aryExport(0,2) = "D1"

aryExport(0,3) = "image"

aryExport(1,0) = "objSummary"

aryExport(1,1) = "Seylan_Card Summary"

aryExport(1,2) = "A3"

aryExport(1,3) = "data"

Dim objExcelWorkbook 'as Excel.Workbook

Set objExcelWorkbook = copyObjectsToExcelSheet(ActiveDocument, aryExport)

'// Now either just leave Excel open or do some other stuff here

'// like saving the excel, some formatting stuff, ...

end sub

But I am unable to further modify this macro to make some part of the Excel sheet Bold and format some figures as shown below

Pls some one modify my macro to do the job

RM	Amount	Discount	Net	Value
A	31,615,057	596	3,108,351	1,425,335
B	24,361,173	578	2,165,268	1,109,795
C	26,521,601	555	2,278,056	1,212,177
D	27,357,731	537	2,636,026	1,236,085
E	26,047,191	520	2,366,188	1,184,050

The first row should be made bold type

Other figures should be formatted  with commas