PivotTable.TableRange2 (Excel)

Returns a Range object that represents the range containing the entire PivotTable report, including page fields.

The TableRange1 property doesn't include page fields.

Dim rngTableRange2 As Range
Set rngTableRange2 = ActiveCell.PivotTable.TableRange2