Excel VBA教程:PivotCellType属性

返回XlPivotCellType 常量之一,该常量识别单元格所对应的数据透视表实体。只读。

XlPivotCellType 可为以下 XlPivotCellType 常量之一。
xlPivotCellBlankCell  数据透视表中的一个结构空白单元格。
xlPivotCellCustomSubtotal  自定义分类汇总的行或列区域中的一个单元格。
xlPivotCellDataField  一个数据字段标志(不是“数据”按钮)。
xlPivotCellDataPivotField  “数据”按钮。
xlPivotCellGrandTotal  总计行或列区域中的一个单元格。
xlPivotCellPageFieldItem  显示页字段的选定项的单元格。
xlPivotCellPivotField  字段的按钮(不是“数据”按钮)。
xlPivotCellPivotItem  不是分类汇总、总计、自定义分类汇总或空行的行或列区域中的单元格。
xlPivotCellSubtotal  分类汇总的行或列区域中的单元格。
xlPivotCellValue  数据区区域(除空行以外)中的任一单元格。

expression.PivotCellType

expression   必需。该表达式返回一个PivotCell对象。

Excel VBA教程:PivotCellType属性·示例

本示例确定数据透视表中的单元格 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

上页:Excel VBA教程:PivotCell属性 下页:Excel VBA教程:PivotField属性

Excel VBA教程:PivotCellType属性

Excel VBA教程:PivotField属性 Excel VBA教程:PivotFields属性
Excel VBA教程:PivotFormulas属性 Excel VBA教程:PivotItem属性
Excel VBA教程:PivotLayout属性 Excel VBA教程:PivotSelection属性
Excel VBA教程:PivotSelectionStandard属性 Excel VBA教程:PivotTable属性
Excel VBA教程:PivotTableSelection属性 Excel VBA教程:PixelsPerInch属性
Excel VBA教程:Placement属性 Excel VBA教程:PlotArea属性
Excel VBA教程:PlotBy属性 Excel VBA教程:PlotOrder属性
Excel VBA教程:PlotVisibleOnly属性 Excel VBA教程:Points属性
Excel VBA教程:Position属性 Excel VBA教程:PostText属性
Excel VBA教程:Precedents属性 Excel VBA教程:PrecisionAsDisplayed属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号