macro send to ecxel

Sat, 16 Apr 2011 01:15:36 GMT

Hello,
I want a macro that allows me to save the active list in an excel file or txt

for example a list contain the values ?? AB and C goal is to register A1 B1 C1 over AB and C.

thank you

I found the code:

Sub ttttt
Set xlApp = CreateObject ("Excel.Application")
Set XLDOC XLApp.Workbooks.Open = ("D: \ tt.xls)
'xlApp.Visible = True

'This Is The qvw tab
Set s = ActiveDocument.Sheets ("Copy of Main")
ActiveDocument.Sheets ("Copy of Main"). Activate
ActiveDocument.ClearCache
'ActiveDocument.GetApplication.WaitForIdle
'ActiveDocument.GetSheetObject ("LB07"). Restore
ActiveDocument.GetSheetObject ("LB07"). CopyTableToClipboard true

'This Is The sheet in Excel
Set xlSheet XLDOC.Worksheets = ("Sheet1")
XLSheet.Paste XLSheet.Range ("A2")

Set xlApp = Nothing
= Nothing Set XLDOC
= Nothing Set xlSheet

End Sub

I manage to register the list in Excel to read it all here but not the active list.
plus I can not excel opens (read only) is there not a way to close it.

Thank you

topic macro send to ecxel in QlikView

macro send to ecxel