PivotTable.ColumnRange (Excel)

Returns a Range object that represents the range that contains the column area in the PivotTable report.

Dim rngColumnRange As Range
Set rngColumnRange = ActiveCell.PivotTable.ColumnRange