expression A variable that represents a CalculatedMembers object.
Parameters
Name
Required/Optional
Data Type
Description
Index
Required
Variant
The name or index number of the object.
Example
The following example notifies the user if the calculated member is valid or not. This example assumes a PivotTable exists on the active worksheet that contains either a valid or invalid calculated member.
Visual Basic for Applications
Sub CheckValidity()
Dim pvtTable As PivotTable
Dim pvtCache As PivotCache
Set pvtTable = ActiveSheet.PivotTables(1)
Set pvtCache = Application.ActiveWorkbook.PivotCaches.<strong>Item</strong>(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.<strong>Item</strong>(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