如何用VBA返回数据透视表内各单元格类型？

楼主
biaotiger1

Q：如何用VBA返回数据透视表内各单元格类型？
A：右键单击sheet1工作表，弹出快捷菜单→“查看代码”，在代码窗口中输入代码如下

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
MsgBox ActiveCell.PivotCell.PivotCellType
End Sub

刷新数据透视表，则弹出对话框显示数据透视表内活动单元格的类型。

PivotCell.PivotCellType参数数值及详细说明如下表

常量	数值	说明
xlPivotCellBlankCell	9	数据透视表中的一个结构空白单元格。
xlPivotCellCustomSubtotal	7	自定义分类汇总的行或列区域中的一个单元格。
xlPivotCellDataField	4	一个数据字段标签（不是“数据”按钮）。
xlPivotCellDataPivotField	8	“数据”按钮。
xlPivotCellGrandTotal	3	总计行或列区域中的一个单元格。
xlPivotCellPageFieldItem	6	显示页字段的选定项的单元格。
xlPivotCellPivotField	5	字段的按钮（不是“数据”按钮）。
xlPivotCellPivotItem	1	不是分类汇总、总计、自定义分类汇总或空行的行或列区域中的单元格。
xlPivotCellSubtotal	2	分类汇总的行或列区域中的单元格。
xlPivotCellValue	0	数据区区域（除空行以外）中的任一单元格。

上一篇：如何用VBA返回活动单元格所在所有列字段项目？
下一篇：如何用VBA返回数据透视表中行或列字段的位置？

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

猜您喜欢

评论列表

sitemap