PivotCell.Range (Excel)

Devuelve un objeto Range que representa el rango al que se aplica la celda dinámica especificada.

Dim rngRange As Range
Set rngRange = ActiveCell.PivotCell.Range