PivotTable.DataLabelRange (Excel)
Returns a Range object that represents the range that contains the labels for the data fields in the PivotTable report.
Dim rngDataLabelRange As Range
Set rngDataLabelRange = ActiveCell.PivotTable.DataLabelRange