PivotField.BaseField (Excel)

Retorna ou define o campo base para um cálculo personalizado. Essa propriedade é válida somente para campos de dados. de leitura/gravação.

Esta propriedade não está disponível para fontes de dados OLAP.

With Worksheets("Sheet1").Range("A3").PivotField 
 .Calculation = xlDifferenceFrom 
 .BaseField = "ORDER_DATE" 
 .BaseItem = "5/16/89" 
End With