Bold IN Excel Macro

Tue, 03 Mar 2015 10:06:14 GMT

HI All

Can some one tell me what we need to do to get Bold Text for all the headers and Bold text at the Total that is end row .

Iam using below macro to export to excel

'sub Expot-Excel

'Dim CLApp, XLDoc,XLSheet

' set XLApp = CreateObject("Excel.Application") ' Define Object

' XLApp.Visible = True 'Visible set as true

' set XLDoc = XLApp.Workbooks.Add 'Open new workbook

' set XLSheet = XLDoc.Worksheets.Add

' ActiveDocument.GetSheetObject("CH20").CopyTableToClipboard TRUE

' XLSheet.paste

' XLSheet.Name= "BBCR CSD"

'end sub

Thanks in Advance

Re: Bold IN Excel Macro

marcus_sommer — Tue, 03 Mar 2015 12:13:32 GMT

I think you could adapt something like this by searching for cell-values like 'Total' or defined a fix row for the header:

- Marcus