Propriété PivotCell.CustomSubtotalFunction (Excel)

Renvoie la définition du champ personnalisé de la fonction de sous-total d’un objet PivotCell. En lecture seule XlConsolidationFunction.

Syntaxe

expression. CustomSubtotalFunction

Expression Variable qui représente un objet PivotCell .

Remarques

La propriété CustomSubtotalFunction renvoie une erreur si le type d’objet PivotCell n’est pas un sous-total personnalisé. Cette propriété s'applique uniquement à des sources de données autres que OLAP.

Exemple

Cet exemple montre comment déterminer si la cellule C20 contient une fonction de sous-total personnalisée qui utilise une fonction de consolidation count, puis si elle avertit l’utilisateur. L'exemple suppose qu'il existe un tableau croisé dynamique dans la feuille de calcul active.

Sub UseCustomSubtotalFunction() 
 
 On Error GoTo Not_A_Function 
 
 ' Determine if custom subtotal function is a count function. 
 If Application.Range("C20").PivotCell.CustomSubtotalFunction = xlCount Then 
 MsgBox "The custom subtotal function is a Count." 
 Else 
 MsgBox "The custom subtotal function is not a Count." 
 End If 
 Exit Sub 
 
Not_A_Function: 
 MsgBox "The selected cell is not a custom subtotal function." 
 
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.