Méthode PivotTable.PivotValueCell (Excel)
Récupérez l’objet PivotValueCell pour un tableau croisé dynamique donné, à condition de certains index de ligne et de colonne.
Syntaxe
expression. PivotValueCell (RowLine, ColumnLine)
Expression Variable qui représente un objet PivotTable .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Ligne | Facultatif | Variant | Si est de type PivotLine, spécifie le trait croisé dynamique dans la zone de ligne sur laquelle pivotValueCell est aligné. Si est de type Int, spécifie la position du trait croisé dynamique sur la zone de ligne avec laquelle pivotValueCell est aligné. S’il est manquant, Empty, Null ou 0 spécifie la ligne du total général. |
ColumnLine | Facultatif | Variant | Si est de type PivotLine, spécifie la ligne de tableau croisé dynamique dans la zone de colonne sur laquelle pivotValueCell est alignée. Si est de type Int, spécifie la position de la ligne de tableau croisé dynamique sur la zone de colonne avec laquelle pivotValueCell est alignée. S’il est manquant, Empty, Null ou 0 spécifie la colonne du total général. |
Valeur renvoyée
PIVOTVALUECELL
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 à la valeur d’une autre cellule.
Sub TestEquality()
Dim X As Double
Dim Y As Double
'This code assumes 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
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.