VBA: Method 'SetSourceData' of object '_Chart' failed For Multiple Pivot Charts

Question

This is part 2 of the previous question:

VBA: Runtime Error - SetSourceData for Second Pivot Chart

After following the (good) advice offered in that thread, I am

Answer 1

I had similar problem. I solved it by setting to nothing variables holding pivotcache and previously used pivottables (before adding second chart).

Answer 2

I had this problem too, on the Excel 2016 64 bit build. Solved it using the technique above to create a shape object, instead of a chart object:

Dim PChart as shape
Set PChart  = PSheet.Shapes.AddChart
    With PChart.Chart
        .ChartType = xl3DColumn
        .SetSourceData Source:=p.TableRange1, PlotBy:=xlRows
    End With