copy pivot table to new workbook/worksheet

Hi,

I'm struggling to copy a pivot table to a new workbook and worksheet. The code below creates the pivot table;

Please Login or Register  to view this content.

but this code is failing once it gets past the creation of new workbook/worsheet stage;

Please Login or Register  to view this content.

Can anyone help please?

Thanks,

Louise

Hi,

Maybe you need to Select or Activate the sheet that has the pivot table on it? I'm looking at your code and it appears that it creates a new workbook, then adds "New Report" to cell A1 on worksheet(1), However once that is completed you are asking the script to copy from the "Activesheet"

Please Login or Register  to view this content.

Just a thought, Mike

Hi Mike,

As you may have guessed I've pieced this code together from more than one source as I'm not that familiar with VBA yet.

Please would you suggest modified coding that I could try?

Thanks,

Louise

since macros can be recorded as well as written, your easiest answer might be to turn on the record...then select the top left of the pivot table (which should select it all)...copy and paste to new workook...the resulting macro could be incorporated into your code above?

add this to your code:

Please Login or Register  to view this content.