Klasse PivotFormulas (Excel VBA)

Die Klasse PivotFormulas stellt die Auflistung von Formeln eines PivotTable-Berichts dar. Um eine PivotFormulas -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise


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

For Each

Hier ist ein Beispiel für die Verarbeitung der PivotFormulas -Elemente in einer Sammlung


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

Add

Erstellt eine neue PivotTable-Formel.

Add (Formula, UseStandardFormula)


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

Arguments

Ein benanntes Argument

Formula (String) - Die neue PivotTable-Formel.

Optional arguments

Das folgendes Argument ist optional

UseStandardFormula - Eine Standard-PivotTable-Formel

Count

Gibt einen Long-Wert zurück, der die Anzahl der Objekte in der Auflistung darstellt.


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

Item

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Item (Index)

Index: Der Name oder die Indexnummer für das Objekt.


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