Copying Pivot Table Data from Excel to Word

[peterhay]

Hi

I have a workbook that contains a number of Pivot Tables.

I want to create a macro that enables me to copy Pivot Table data into Word.

Given that the shape and size of the Pivot Table can vary I am struggling to find a way of automatically finding and selecting all the cells within the Pivot Table.

Any help on this much appreciated.

Thanks
Pete

 

[Andrew Poulsom]

You can use the TableRange1 property, which excludes the page fields, or the TableRange2 property which includes them.

 

[Greg Truby]

debug.print activesheet.pivottables(1).tablerange1.address

 

[peterhay]

Guys

Thanks for the prompt reply. This is exactly what I was after

Peter

 

[Legacy 306721]

Hello,

Sorry - I'm new to this forum, so I apologize if I'm doing something contrary to general etiquette on this forum.

I am completely new to VBA, but I have a decent grasp of basic programming concepts (I learned originally from Python). At my work, I have been given the task to find a way to find a way to create a macro that will copy and paste PivotTables in an Excel workbook to a Word document. I was surprised that I was able to find something on this website about it, as a Google search didn't help me at all. I have already asked this question on StackOverflow:

I have searched online for the past few days for an answer to this question, but to no avail.

For a project at my work, my boss is wondering if it is possible to create a macro which can select a PivotTable and place it in certain points of a Word document (not the beginning of the document, necessarily). I don't at all consider myself familiar with VBA, but I can understand the syntax. I would imagine the way to approach this would be to select a certain Range and Worksheet in Excel, copy and paste whatever is in the range, and put it in some point of the Word document. But I'm not sure how to implement the part with Word.

Does anyone have suggestions on, at the very least, how I could approach this?

Thanks.