topic Re: export object to excel? in QlikView

export object to excel?

Wed, 16 Sep 2015 20:44:54 GMT

what macro should i use? i'm using this but it isn't working

sub Exporta_a_Excel

set obj = ActiveDocument.GetSheetObject("CH13")

set vArchivo = "N:\APP\MARGEN_ESTIMADO\QVW\Informe.xls"

obj.ExportEx vArchivo,5

end sub

Re: export object to excel?

robert_mika — Wed, 16 Sep 2015 21:44:53 GMT

Try here:

luciancotea.wordpress.com/2013/07/18/qlikview-macros-useful-collection/

Re: export object to excel?

qlikviewwizard — Thu, 17 Sep 2015 04:16:15 GMT

‌hi check this thread:

https://community.qlik.com/docs/DOC-4870

Re: export object to excel?

Thu, 17 Sep 2015 15:39:05 GMT

that macro didn't work for me

Re: export object to excel?

Thu, 17 Sep 2015 15:48:49 GMT

i edited only the object part but it isn't working. Do you know why?

FUNCTION ExcelExport(CH13)

set obj = ActiveDocument.GetSheetObject( CH13)

w = obj.GetColumnCount

if obj.GetRowCount>1001 then

h=1000

else h=obj.GetRowCount

end if

Set objExcel = CreateObject("Excel.Application")

objExcel.Workbooks.Add

objExcel.Worksheets(1).select()

objExcel.Visible = True

set CellMatrix = obj.GetCells2(0,0,w,h)

column = 1

for cc=0 to w-1

objExcel.Cells(1,column).Value = CellMatrix(0)(cc).Text

objExcel.Cells(1,column).EntireRow.Font.Bold = True

column = column +1

c = 1

r =2

for RowIter=1 to h-1

for ColIter=0 to w-1

objExcel.Cells(r,c).Value = CellMatrix(RowIter)(ColIter).Text

c = c +1

r = r+1

c = 1

END FUNCTION

SUB CallExample

ExcelExport( "CH01" )

END SUB