Partager via


Propriété CalculatedMembers.Item (Excel)

Renvoie un seul objet d’une collection.

Syntaxe

expression. Élément (Index)

Expression Variable qui représente un objet CalculatedMembers .

Parameters

Nom Requis/Facultatif Type de données Description
Index Obligatoire Variant Nom ou numéro d'index de l'objet.

Exemple

L'exemple suivant montre comment indiquer à l'utilisateur si le membre calculé est valide ou non. Cet exemple suppose qu’un tableau croisé dynamique existe dans la feuille de calcul active qui contient un membre calculé valide ou non valide.

Sub CheckValidity() 
 
 Dim pvtTable As PivotTable 
 Dim pvtCache As PivotCache 
 
 Set pvtTable = ActiveSheet.PivotTables(1) 
 Set pvtCache = Application.ActiveWorkbook.PivotCaches.Item(1) 
 
 ' Handle run-time error if external source is not an OLEDB data source. 
 On Error GoTo Not_OLEDB 
 
 ' Check connection setting and make connection if necessary. 
 If pvtCache.IsConnected = False Then 
 pvtCache.MakeConnection 
 End If 
 
 ' Check if calculated member is valid. 
 If pvtTable.CalculatedMembers.Item(1).IsValid = True Then 
 MsgBox "The calculated member is valid." 
 Else 
 MsgBox "The calculated member is not valid." 
 End If 
 
Not_OLEDB: 
MsgBox "The source is not an OLEDB data source." 
Exit Sub 
 
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.