Objet PivotValueCell (Excel)

Fournit un moyen d’exposer des valeurs de cellules au cas où des cellules réelles (objets Range ) ne sont pas disponibles.

Exemple

Cet exemple de code utilise la propriété PivotValueCell pour tester si la valeur d’une cellule d’un tableau croisé dynamique est supérieure à celle d’une autre cellule.

Sub TestEquality()
Dim X As Double
Dim Y As Double

'This code assumes that you have a Standalone PivotChart on one of the worksheets.
X = ThisWorkbook.PivotTables(1).PivotValueCell(1, 1).Value
Y = ThisWorkbook.PivotTables(1).PivotValueCell(1, 2).Value

If X > Y Then
MsgBox "X is greater than Y"
Else
MsgBox "Y is greater than X"
End If
End Sub

Méthodes

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.