Export to excel

[sibin_jacob]

Hi,

I am not getting header when I am exporting straight table to excel. Is there any settings to get the staright table header also in exporting to excel functionality?

Thanks,

Sibin Jacob.c

[#2]

Hi

I think You can't do it by an argument of CopyTableToClipboard

but

You can copy Label and then copy whole chart (without label)

try this code:

sub ExportExcel()

'create Excell

        Set xlApp = CreateObject("Excel.Application")

        xlApp.Visible = true

        Set xlDoc = xlApp.Workbooks.Add()

        Set xlSheet = xlDoc.Worksheets.Add

        Set SheetObj = ActiveDocument.GetSheetObject("CH01")   

'copy Label

        chartCaption = SheetObj.GetCaption.Name.v

        xlSheet.Range("A1") = chartCaption

'copy table content

        SheetObj.CopyTableToClipboard true   

        xlSheet.Range("A2").PasteSpecial  Paste = xlPasteValues

End sub

[sibin_jacob]

Thanks pari, I need to know is there any option for exporting to excel without using macro ?

I need header of the table also...

Thanks,

Sibin Jacob.c