Partager via


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.