Excel) (CubeField.CreatePivotFields 方法

CreatePivotFields 方法允许用户通过创建相应的数据透视字段对象将筛选器应用于尚未添加到数据透视表的数据透视字段。

语法

表达式。CreatePivotFields

表达式 表示 CubeField 对象的变量。

备注

在 OLAP 数据透视表中，在将相应的 CubeField 添加到数据透视表之前，数据透视字段不存在。 CreatePivotFields 方法使用户能够创建 CubeField 的所有数据透视字段。 用户还可以在将 CubeField 添加到数据透视表之前，将筛选添加到透视字段并设置其属性。

示例

Sub FilterFieldBeforeAddingItToPivotTable() 
 ActiveSheet.PivotTables("PivotTable1").CubeFields("[Date].[Fiscal]").CreatePivotFields 
 
 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Fiscal Year]").VisibleItemsList = 
 
 "[Date].[Fiscal].[Fiscal Semester]").VisibleItemsList = Array("") 
 ActiveSheet.PivotTables("PivotTable1").PivotFields( _ 
 "[Date].[Fiscal].[Fiscal Quarter]").VisibleItemsList = Array("") 
 
 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Month]"). _ 
 VisibleItemsList = Array("") 
 
 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Date]"). _ 
 VisibleItemsList = Array("") 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。

  • Last updated on