expression.EnableItemSelection
expression Required. An expression that returns a PivotField object.
Remarks
A run-time error will occur if the OLAP PivotTable field is not the highest level for the hierarchy.
Example
This example determines the setting for selecting items using the field dropdown and enables the feature, if necessary. The example assumes a PivotTable exists on the active worksheet.
Sub UseEnableItemSelection()
Dim pvtTable As PivotTable
Dim pvtField As PivotField
Set pvtTable = ActiveSheet.PivotTables(1)
Set pvtField = pvtTable.RowFields(1)
' Determine setting for property and enable if necessary.
If pvtField.EnableItemSelection = False Then
pvtField.EnableItemSelection = True
MsgBox "Item selection enabled for fields."
Else
MsgBox "Item selection is already enabled for fields."
End If
End Sub