如何将数据透视表的默认汇总方式从求和改为计数

2025-03-23 04:41:59
推荐回答(3个)
回答1:

Sub SumDataFields()
'批量修改数据透视表的计算字段为计数
Dim ptField As PivotField
For Each ptField In ActiveSheet.PivotTables(1).DataFields
With ptField
.Function = xlcount
.Caption = "计数项:" & .SourceName
End With
Next
End Sub

回答2:

似乎有点困难,这也是本个想解决的。通常情况下张统计项如是文本对象,则是计数,而数字对象则默认为求和。没办法。

回答3:

对数据透视表我不熟悉,无法帮助你。