PivotTable.TableRange1 (Excel)
Returns a Range object that represents the range containing the entire PivotTable report, but doesn't include page fields.
The TableRange2 property includes page fields.
Dim rngTableRange1 As Range
Set rngTableRange1 = ActiveCell.PivotTable.TableRange1