Range.LocationInTable (Excel)

Returns a constant that describes the part of the PivotTable report that contains the upper-left corner of the specified range. Can be one of the following XlLocationInTable constants. Here you can find possible values for XlLocationInTable.

Dim xliLocationInTable As XlLocationInTable
xliLocationInTable = ActiveCell.LocationInTable