expression.ShowInFieldList
expression Required. An expression that returns one of the objects in the Applies To list.
Example
In this example, Microsoft Excel determines if a CubeField object can be shown in the Field list and notifies the user. This example assumes a PivotTable report exists on the active worksheet and a CubeField object exists.
Sub IsCubeFieldInList()
Dim pvtTable As PivotTable
Dim cbeField As CubeField
Set pvtTable = ActiveSheet.PivotTables(1)
Set cbeField = pvtTable.CubeFields("[Country]")
' Determine if a CubeField can be seen.
If cbeField.ShowInFieldList = True Then
MsgBox "The CubeField object can be seen in the field list."
Else
MsgBox "The CubeField object cannot be seen in the field list."
End If
End Sub