When i export the data from Pivot table into excel sheet

[Anonymous]

Hi All,

I have one requirement that when i export the data from a pivot table from qlikview to excel. Is there any way the output in the excel also be a pivot format of the data. Thanks for your help in advance.

[Anonymous]

Any help on this please

[ecolomer]

No, the format are standard

[engishfaque]

Dear Vinay,

Tricky way to copy/paste Pivot Table in Microsoft Excel. Copy/Paste Pivot Table from QlikView to Microsoft Word, and then import MS Document in MS Excel. Here are the three steps solution, please follow.

Steps 1: Go to QlikView

Pivot Table > Copy to Clipboard > Object.

Step 2: Go to Microsoft Office Word 2003

New Document > Paste (CTRL + V).

Step 3: Go to Microsoft Excel 2003

New Sheet > Menu Insert > Object > Tab Create from File > Browse "Word Document" > OK.

Should you require any help, please let me know.

Kind regards,

Ishfaque Ahmed

[#5]

Hi Vinay,

No as others have said that is the standard format, you can simply use the excel pivot capability on the exported data to achieve similar results though

hope that helps

Joe

[Anonymous]

HI Ahmed,

Sorry that did not help me. Thanks a lot for your response.

[Anonymous]

HI Joe,

Thanks for your response. So you are saying that once i export the data to excel ..do i need to modify the excel sheet to set up as Pivot table. Please guide me.

[giakoum]

Or you can use a macro to do the job. This one below only exports to excel. But you can amend it to create a pivot. I have never done it, so please don't ask for help, this is a big task. Sorry!

SUB Excel

set obj = ActiveDocument.GetSheetObject( "CH01" )

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 8

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

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

       column = column +1

next

c = 1

r =2

for RowIter=1 to h-1  

    for ColIter=0 to 8           

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

        'msgbox(CellMatrix(RowIter)(ColIter).Text)

        c = c +1

    next

    r = r+1

       c = 1

next

END SUB

[Anonymous]

Its exporting the data to excel but the exported data is not in the format of pivot table....

[shree909]

Hi Vinay ,

I don't think this would be the solution. This would work for creating a pdf file.

The other way is u can create a report  add the pivot table , ask the user to select the report or create a button to run the report as a pdf file .

Thanks