Klasse ValueChange - einen Wert, der in einem PivotTable-Bericht auf der Grundlage einer OLAP-Datenquelle geändert wurde (Excel VBA)

Die Klasse ValueChange stellt einen Wert dar, der in einem PivotTable-Bericht auf der Grundlage einer OLAP-Datenquelle geändert wurde. Um eine ValueChange -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim vlc as ValueChange
Set vlc = ActiveCell.PivotTable.ChangeList(Index:=1)

For Each

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

Dim vlcChangeList As ValueChange
For Each vlcChangeList In ActiveCell.PivotTable.ChangeList
	
Next vlcChangeList

AllocationMethod

Gibt die Methode zurück, die zum Zuordnen dieses Werts beim Ausführen einer was-wäre-wenn-Analyse verwendet werden soll. Mögliche Rückgabewerte sind xlEqualAllocation - Gleiche Zuordnung verwenden, xlWeightedAllocation - Gewichtete Zuordnung verwenden.

Die AllocationMethod-Eigenschaft entspricht der Einstellung Zuweisungsmethode im Dialogfeld Einstellungen der Was-wäre-wenn-Analysefür einen auf einer OLAP-Datenquelle basierenden PivotTable-Bericht, wie sie zum Zeitpunkt der ursprünglichen Übernahme der Änderung festgelegt wurde. Wenn das angegebene ValueChange -Objekt mithilfe der Add -Methode der PivotTableChangeList -Auflistung erstellt wurde und der entsprechende AllocationMethod -Parameter nicht angegeben wurde, wird die standardmäßige Zuordnungsmethode des OLAP-Server wird zurückgegeben.

Dim xamAllocationMethod As XlAllocationMethod
xamAllocationMethod = ActiveCell.PivotTable.ChangeList(1).AllocationMethod

AllocationValue

Gibt den Wert zurück, der beim Ausführen einer was-wäre-wenn-Analyse reserviert werden soll. Mögliche Rückgabewerte sind xlAllocateIncrement - Basierend auf dem alten Wert erhöhen, xlAllocateValue - Der eingegebene Wert, geteilt durch die Anzahl der Zuweisungen.

Die AllocationValue-Eigenschaft entspricht der Einstellung Zuzuweisender Wert im Dialogfeld Einstellungen der Was-wäre-wenn-Analysefür einen auf einer OLAP-Datenquelle basierenden PivotTable-Bericht, wie sie zum Zeitpunkt der ursprünglichen Übernahme der Änderung festgelegt wurde. Wenn das angegebene ValueChange -Objekt mithilfe der Add -Methode der PivotTableChangeList -Auflistung erstellt wurde und der entsprechende __ Parameter "allocationvalue" nicht angegeben wurde, wird der Standard Zuordnungswert der OLAP Server wird zurückgegeben.

Dim xavAllocationValue As XlAllocationValue
xavAllocationValue = ActiveCell.PivotTable.ChangeList(1).AllocationValue

AllocationWeightExpression

Gibt den für diesen Wert beim Ausführen einer Was-wäre-wenn-Analyse zu verwendenden MDX-Gewichtungsausdruck zurück.

Die AllocationWeightExpression-Eigenschaft entspricht der Einstellung Gewichtungsausdruck im Dialogfeld Einstellungen der Was-wäre-wenn-Analysefür einen auf einer OLAP-Datenquelle basierenden PivotTable-Bericht, wie sie zum Zeitpunkt der ursprünglichen Übernahme der Änderung festgelegt wurde. Wenn das angegebene ValueChange -Objekt mithilfe der Add -Methode der PivotTableChangeList -Auflistung erstellt wurde und der entsprechende AllocationWeightExpression -Parameter nicht angegeben wurde, wird die Standardgewichtung der Ausdruck des OLAP-Servers wird zurückgegeben.

Dim strAllocationWeightExpression As String
strAllocationWeightExpression = ActiveCell.PivotTable.ChangeList(1).AllocationWeightExpression

Delete

Löscht das angegebene ValueChange -Objekt aus der PivotTableChangeList -Auflistung.

ActiveCell.PivotTable.ChangeList(1).Delete

Order

Gibt einen Wert zurück, der die Reihenfolge angibt, in der diese Änderung im Verhältnis zu anderen Änderungen in der PivotTableChangeList -Auflistung ausgeführt wurde.

Der Wert der Order-Eigenschaft wird von Excel automatisch basierend auf der Reihenfolge zugewiesen, in der der Benutzer die Änderungen an Wertzellen im PivotTable-Bericht vorgenommen hat.

Dim lngOrder As Long
lngOrder = ActiveCell.PivotTable.ChangeList(1).Order

PivotCell

Gibt ein PivotCell -Objekt zurück, das die geänderte Zelle (Tupel) darstellt.

Wenn der Wert der VisibleInPivotTable -Eigenschaft des angegebenen ValueChange -Objekts auf truefestgelegt ist, gibt die PivotCell -Eigenschaft ein PivotCell -Objekt für die Zelle (Tupel) zurück, die geändert wurde. Wenn der Wert der VisibleInPivotTable -Eigenschaft des angegebenen ValueChange -Objekts auf falsefestgelegt ist, gibt die PivotCell -Eigenschaft nullzurück.

Dim pvtlcelPivotCell As PivotCell
Set pvtlcelPivotCell = ActiveCell.PivotTable.ChangeList(1).PivotCell

Tuple

Gibt das MDX-Tupel des Werts zurück, der in der OLAP-Datenquelle geändert wurde.

Dim strTuple As String
strTuple = ActiveCell.PivotTable.ChangeList(1).Tuple

Value

Gibt den Wert zurück, den der Benutzer in der Zelle eingegeben oder die Formel in der Zelle ausgewertet wurde, bis die Update Cube -Anweisung zuletzt für die OLAP-Datenquelle ausgeführt wurde.

Dim dblValue As Double
dblValue = ActiveCell.PivotTable.ChangeList(1).Value

VisibleInPivotTable

Gibt zurück, ob die Zelle (Tupel) aktuell im PivotTable-Bericht sichtbar ist.

Gibt true zurück, wenn die Zelle (Tupel) derzeit im PivotTable-Bericht sichtbar ist; andernfalls false.

Dim booVisibleInPivotTable As Boolean
booVisibleInPivotTable = ActiveCell.PivotTable.ChangeList(1).VisibleInPivotTable