topic Macro for export a report in excel in QlikView

Macro for export a report in excel

koushik_btech20 — Thu, 21 Aug 2014 13:07:24 GMT

I have attached a qvw where I have to export the report in excel through a Macro. Now the problem is , in the application there are three party.If user select 2 party from the listbox and then click the button 'Send to Excel' then it will export party wise two different excel means for Party PTY01 wise Sale Details in a excel and for Party PTY02 wise Sale Details in another excel.

Re: Macro for export a report in excel

ecolomer — Thu, 21 Aug 2014 13:26:40 GMT

I do not quite understand what you intend,

I am attaching a model export to excel if you can serve.

Re: Re: Macro for export a report in excel

koushik_btech20 — Thu, 21 Aug 2014 14:01:39 GMT

After selecting two party from the listbox and click the button 'Send to Excel ' what will be my desired output excel file after export has been attached. Please check and revert.

Re: Re: Re: Macro for export a report in excel

ecolomer — Thu, 21 Aug 2014 15:06:21 GMT

Here you are your file

Re: Macro for export a report in excel

jagan — Thu, 21 Aug 2014 15:11:37 GMT

Hi Koushik,

Check this thread hope it helps you.

Useful Qlikview Macros

Regards,

Jagan.

Re: Macro for export a report in excel

jagan — Thu, 21 Aug 2014 15:15:06 GMT

Hi,

Try this code

FUNCTION ExportObjectToJpg( ObjID, fName)
ActiveDocument.GetSheetObject(ObjID).ExportBitmapToFile fName
END FUNCTION
SUB ExportChartByListboxValues
DIM fname, value, filePath, timestamp
filePath = ActiveDocument.Variables("vPDFFlagPath").GetContent.STRING
timestamp = Year(Now()) & DatePart("m", Now()) & DatePart("d", Now()) & DatePart("h", Now()) & DatePart("n", Now()) & DatePart("s", Now())
SET Doc = ActiveDocument
fieldName = "EmployeeID"
SET Field = Doc.Fields(fieldName).GetPossibleValues
FOR index = 0 to Field.Count-1
Doc.Fields(fieldName).Clear
Doc.Fields(fieldName).SELECT Field.Item(index).Text
fileName = Field.Item(index).Text & "_" & timestamp & ".jpg"'Field.Item(index).Text & DateValue
ExportObjectToJpg "CH420", filePath & fileName
NEXT
Doc.Fields(fieldName).Clear
END SUB

Regards,

Jagan.

Re: Macro for export a report in excel

koushik_btech20 — Fri, 22 Aug 2014 04:26:15 GMT

The macro you have written in my app is not working properly.I want party wise break up into two sheet after selecting two party from the listbox and clicking on the button.