HasMemberProperties Property

expression.HasMemberProperties

expression    Required. An expression that returns a CubeField object.

Example

The example determines if there are member properties to be displayed for the cube field and notifies the user. The example assumes a PivotTable exists on the active worksheet.

Sub UseHasMemberProperties()

    Dim pvtTable As PivotTable
    Dim cbeField As CubeField

    Set pvtTable = ActiveSheet.PivotTables(1)
    Set cbeField = pvtTable.CubeFields("[Country]")

    ' Determine if there are member properties to be displayed.
    If cbeField.HasMemberProperties = True Then
        MsgBox "There are member properties to be displayed."
    Else
        MsgBox "There are no member properties to be displayed."
    End If

End Sub