Share via


CalculatedMember Object

This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

CalculatedMembers
Aa612957.parchild(en-us,office.10).gifCalculatedMember

Represents the calculated fields and calculated items for PivotTables with Online Analytical Processing (OLAP) data sources.

Using the CalculatedMember object

Use the Add method or the Item property of the CalculatedMembers collection to return a CalculatedMember object.

With a CalculatedMember object you can check the validity of a calculated field or item in a PivotTable using the IsValid property.

Note The IsValid property will return True if the PivotTable is not currently connected to the data source. Use the MakeConnection method before testing the IsValid property.

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.

  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

End Sub