全部显示返回 XlPivotCellType 常量之一，该常量识别单元格所对应的数据透视表实体。只读。
| XlPivotCellType 可为以下 XlPivotCellType 常量之一。 |
| xlPivotCellBlankCell 数据透视表中的一个结构空白单元格。 |
| xlPivotCellCustomSubtotal 自定义分类汇总的行或列区域中的一个单元格。 |
| xlPivotCellDataField 一个数据字段标志（不是“数据”按钮）。 |
| xlPivotCellDataPivotField “数据”按钮。 |
| xlPivotCellGrandTotal 总计行或列区域中的一个单元格。 |
| xlPivotCellPageFieldItem 显示页字段的选定项的单元格。 |
| xlPivotCellPivotField 字段的按钮（不是“数据”按钮）。 |
| xlPivotCellPivotItem 不是分类汇总、总计、自定义分类汇总或空行的行或列区域中的单元格。 |
| xlPivotCellSubtotal 分类汇总的行或列区域中的单元格。 |
| xlPivotCellValue 数据区区域（除空行以外）中的任一单元格。 |
expression.PivotCellType
expression 必需。该表达式返回一个 PivotCell 对象。
本示例确定数据透视表中的单元格 A5 是否是一个数据项，并通知用户。本示例假定数据透视表位于活动工作表上。如果单元格 A5 不在数据透视表中，则本示例处理运行错误。
Sub CheckPivotCellType()
On Error GoTo Not_In_PivotTable
' Determine if cell A5 is a data item in the PivotTable.
If Application.Range("A5").PivotCell.PivotCellType = xlPivotCellValue Then
MsgBox "The cell at A5 is a data item."
Else
MsgBox "The cell at A5 is not a data item."
End If
Exit Sub
Not_In_PivotTable:
MsgBox "The chosen cell is not in a PivotTable."
End Sub