Clase PivotFormulas (Excel VBA)

La clase PivotFormulas representa la colección de fórmulas de un informe de tabla dinámica. Para usar una variable de clase PivotFormulas, primero debe ser instanciado, por ejemplo

Dim pfs as PivotFormulas
Set pfs = ActiveCell.PivotTable.PivotFormulas

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos PivotFormulas en una colección.

Dim pvtfor As PivotFormula
For Each pvtfor In ActiveCell.PivotTable.PivotFormulas
	
Next pvtfor

Add

Crea una nueva fórmula de tabla dinámica.

Add (Formula, UseStandardFormula)

Worksheets(1).PivotTables(1).PivotFormulas _ 
 .Add "Year['1998'] Apples = (Year['1997'] Apples) * 2"

Arguments

Un argumento con nombre

Formula (String) - Nueva fórmula de tabla dinámica.

Optional arguments

Los siguientes argumentos son opcionales

UseStandardFormula - Fórmula de tabla dinámica estándar

Count

Devuelve un valor Long que representa el número de objetos de la colección.

Dim lngCount As Long
lngCount = ActiveCell.PivotTable.PivotFormulas.Count

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Número de índice o nombre del objeto.

Dim pvtfor As PivotFormula
Set pvtfor = ActiveCell.PivotTable.PivotFormulas(Index:=1)