topic Execel Export in QlikView

Execel Export

Thu, 18 Feb 2010 11:36:52 GMT

I am very new , How to call the macro for exporting data to excel , Please give some sample it will helps

Execel Export

Thu, 18 Feb 2010 12:01:15 GMT

Hi Nagarajan,

You can write the macro
in Edit Module

macro to send data into Excel

Sub Sent_to_excel

Path = "C:\Documents and Settings\rlimumweb011\Desktop\testMail.xls"

set obj = ActiveDocument.GetSheetObject("CH266")

obj.ExportBiff Path

End Sub

'' path is the location where xls file will save with the given name

'' CH266 is the sheet object id

you have to change this according your requirement

and youo can call this macro on various events
as per your requirement

Hope this will help you

Thank You
Rahul

Execel Export

Thu, 18 Feb 2010 13:21:50 GMT

Thanks Rahul,

How can i call the macro to My Chat, If its possiable please help me.

I have the chat but i could able to export the data to execl(Right click)

Thanks

Execel Export

Thu, 18 Feb 2010 13:31:28 GMT

Thanks Rahul,

How can i call the macro to My Chart, If its possiable please help me.

I have the chat but i could able to export the data to execl(Right click)

Thanks

Execel Export

Mon, 22 Feb 2010 11:11:38 GMT

This just exports without saving - exports two charts one under the other (CH_Cases and CH_Handling):

sub export_summary ' macro name

set v = ActiveDocument.Variables("QvWorkPath")

set XLApp = CreateObject("Excel.Application")
XLApp.Visible =true' false
set ExcelDoc = XLApp.Workbooks.Add

call REPORTING_createSelectionSheet(ExcelDoc)
ExcelDoc.Sheets.Add

ExcelDoc.Sheets(1).activate

set obj1 = ActiveDocument.getsheetobject("CH_Cases") ' here you must enter your object name
obj1.CopyTableToClipboard true
ExcelDoc.Sheets(1).cells(1,1).select
ExcelDoc.Sheets(1).paste
ExcelDoc.Sheets(1).Rows("1:1").Font.Bold = True
'obj1.Close()
set obj1 = nothing

set obj2 = ActiveDocument.getsheetobject("CH_Handling") ' here you must enter your object name
obj2.CopyTableToClipboard true
ExcelDoc.Sheets(1).cells(25,1).select
ExcelDoc.Sheets(1).paste
ExcelDoc.Sheets(1).Rows("25:25").Font.Bold = True
'obj2.Close()
set obj2 = nothing

end sub

You must then make a button in your application and assign your macro (export_summary) to it. When your then press the button your charts are exported.

Execel Export

rohit214 — Thu, 24 May 2012 16:47:18 GMT

hi Rahul

your macro helps me lot but i want file name also means if i have 100 dealer so at the time of reload it should generate 100 dealer report with with ddiffrent file name.(filename_DEALERNAME.xls)

thanks

rohit