Create QVD of pivot table data

[#1]

Dear All,

Find The attached File for below discussion.

in attached file sheet 1 contains my data in Pivot Table format and we want to store the same data in qvd as in sheet 2 format.

please help to write macro to export to QVD.

Note : i cannot change the pivot table format as based on that format some other macros are working.

[marcus_sommer]

Try this:

sub ChartToQVD 

    set obj = ActiveDocument.GetSheetObject("CH01") 

    obj.ExportEx "QvdName.qvd", 4 

end sub 

whereby it might be better to use a different (more specialized) chart/table (maybe on a hidden sheet) for this task.

- Marcus