PivotField.TotalLevels (Excel)
Devuelve el número total de campos incluidos en el grupo de campos actual.
Todos los campos de un conjunto de campos agrupados tienen el mismo valor de TotalLevels.
Dim lngTotalLevels As Long
lngTotalLevels = ActiveCell.PivotField.TotalLevels