Klasse PivotFormula - eine Formel in einem PivotTable-Bericht (Excel VBA)
Die Klasse PivotFormula stellt eine Formel dar, die zur Berechnung von Ergebnissen in einem PivotTable-Bericht verwendet wird. Um eine PivotFormula -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim pvtfor as PivotFormula
Set pvtfor = ActiveCell.PivotTable.PivotFormulas(Index:=1)
For Each
Hier ist ein Beispiel für die Verarbeitung der PivotFormula -Elemente in einer Sammlung
Dim pvtfor As PivotFormula
For Each pvtfor In ActiveCell.PivotTable.PivotFormulas
Next pvtfor
Delete
Löscht das Objekt.
ActiveCell.PivotTable.PivotFormulas(1).Delete
Formula
Gibt einen String-Wert zurück, der die Formel des Objekts in der A1-Schreibweise und in der Sprache des Makros darstellt, oder legt diesen fest.
Diese Eigenschaft ist für OLAP-Datenquellen nicht verfügbar. Wenn die Zelle eine Konstante enthält, gibt die Eigenschaft die Konstante zurück. Wenn Sie für den Wert oder die Formel einer Zelle ein Datum festlegen, prüft Microsoft Excel, ob die Zelle bereits mit einem der Datums- oder Zeitformate formatiert wurde. Wenn der Bereich einen ein- oder zweidimensionalen Bereich darstellt, können Sie für die Formel eine Visual Basic-Matrix mit derselben Dimension festlegen. Beim Festlegen der Formel für einen Bereich mit mehreren Zellen wird die Formel in alle Zellen des Bereichs eingetragen.
ActiveCell.PivotTable.PivotFormulas(1).Formula =
Index
Gibt zurück oder legt einen Long -Wert, der die Indexnummer des PivotFormula -Objekts in der PivotFormulas -Auflistung darstellt.
ActiveCell.PivotTable.PivotFormulas(1).Index =
StandardFormula
Gibt einen String-Wert zurück oder legt diesen fest, der für Formeln das Standardformat "Englisch (USA)" angibt.
Die StandardFormulaStandardFormula-Eigenschaft wirkt sich in erster Linie auf Elementnamen aus, die ein Datums- oder Zahlenformat besitzen. Die StandardFormula -Eigenschaft ist "International Friendly", wohingegen die Formula -Eigenschaft nicht ist.
ActiveCell.PivotTable.PivotFormulas(1).StandardFormula = "Decimals + 10"
Value
Gibt einen String-Wert zurück, der den Namen der angegebenen Formel in der PivotTable-Formel darstellt, oder legt diesen fest.
ActiveCell.PivotTable.PivotFormulas(1).Value =