【发布时间】:2013-06-14 11:49:52
【问题描述】:
在 Excel 2003 中,我试图创建一个 Workbook_SheetPivotTableUpdate Sub,它对数据透视表实施限制,这样特定行字段的特定数据透视项绝不能显示,但仍必须对小计和总计做出贡献。
我知道有一个设置“小计隐藏页面项目”,如果该字段是页面字段,则允许发生这种情况。我也知道如何强制透视项目可见或不可见:
Private Sub Workbook_SheetPivotTableUpdate(ByVal Sh As Object, ByVal Target As PivotTable)
Dim pvtField As PivotField
Dim pvtItem As PivotItem
Set pvtField = Target.PivotFields("Specific Field")
If pvtField.Orientation = xlRowField Then
Set pvtItem = pvtField.PivotItems("Specific Item")
pvtItem.Visible = False
End If
End Sub
但我不知道是否可以将其置于用户看不到它但它继续为数据透视表中的小计和总计做出贡献的状态。
没有遍历数据透视表的行并将行高设置为 0,是否存在数据透视项目的状态或操作 Excel 计算总计的方式来完成此操作的方法?
【问题讨论】:
标签: excel excel-2003 vba