Range.PivotCell (Excel)

Retorna um objeto PivotCell que representa uma célula em um relatório de tabela dinâmica.

Dim pvtlcelPivotCell As PivotCell
Set pvtlcelPivotCell = ActiveCell.PivotCell