ColumnItems Property [Excel 2003 VBA Language Reference]

  • Article

Returns a PivotItemList collection that corresponds to the items on the column axis that represent the selected range.

expression.ColumnItems

expression Required. An expression that returns a PivotCell object.

Example

This example determines if the data item in cell B5 is under the Inventory item in the first column field and notifies the user. The example assumes that a PivotTable exists on the active worksheet and that column B contains a column field of the PivotTable.

Sub CheckColumnItems()

    ' Determine if there is a match between the item and column field.
    If Application.Range("B5").PivotCell.ColumnItems.Item(1) = "Inventory" Then
        MsgBox "Item in B5 is a member of the 'Inventory' column field."
    Else
        MsgBox "Item in B5 is not a member of the 'Inventory' column field."
    End If

End Sub

Applies to | PivotCell Object