out.PivotTable.SourceData, InStr(1,
> y.Chart.PivotLayout.PivotTable.SourceData, "!R") - 1) & vbNewLine & _
> "Pivot Source:- " & y.Chart.PivotLayout.PivotTable.SourceData
>
> Next y
>
> Next ws
> End Sub
>
> On Thu, Mar 24, 2011 at 1:26 AM, B
HI,
I have been given a workbook with about 50 PivotCharts on 6
worksheets.
Each PivotChart has an associated PivotTable the name and source sheet
name of which I can find by right-clicking on the Pivotchart and
choosing "select data".
However, that's going to take a while.
Is there any way I can g