Check out the Pivot Play add-in at this location:
http://www.contextures.com/xlPivotPlay01.html

Among other things, it lists all of the pivot tables in a worksheet and
displays their sources.

Does that help?
***********
Regards,
Ron

XL2003, WinXP


"John" wrote:

Hi,

I've picked up a dozen or so Spreadsheets each having numerous pivot tables.
Is their some using VBA i can get a list of each Pivot Table and its data
source please.

Thanks
JB