DisplayImmediateItems Property

expression.DisplayImmediateItems

expression    Required. An expression that returns a PivotTable object.

Example

This example determines how the PivotTable was created and notifies the user. It assumes a PivotTable exists on the active worksheet.

Sub CheckItemsDisplayed()

    Dim pvtTable As PivotTable

    Set pvtTable = ActiveSheet.PivotTables(1)

    ' Determine how the PivotTable was created.
    If pvtTable.DisplayImmediateItems = True Then
        MsgBox "Fields have been added to the row or column areas for the PivotTable report."
    Else
        MsgBox "The PivotTable was created by using object-model calls."
    End If

End Sub