VBA =GetPivotData() producing runtime error 1004

I All,

I have a sub called SumTBCs that loops through sheets where the sheet name begins 'SLA...' and adds up any pivot table subtotals where the pivot table result is "TBC"

It was working I'm sure.
But now it works intermittently.

I've attached a sample workbook to test

TBCs Example.png

There's no "TBC" results in SLA1 to test.

Running the first sub in sheet 'SLA2' produces a MsgBox displaying '7' which is correct

Running the second sub in sheet 'SLA3' produces a runtime error 1004?

I thought perhaps the sheet was corrupt so I removed it and created it again by copying SLA2, but it made no difference.

Any advice greatly appreciated,
All the best
V