PivotFilter.DataCubeField (Excel)

This property is applicable only to OLAP PivotTables and provides the Value field (PivotField in the Values area) being filtered by for a value filter.

Dim cbfDataCubeField As CubeField
Set cbfDataCubeField = ActiveCell.PivotTable.ActiveFilters(1).DataCubeField