共用方式為

CubeField.CreatePivotFields 方法 (Excel)

  • 發行項

CreatePivotFields方法可讓使用者藉由建立對應的 PivotField 物件，將篩選套用至尚未新增至樞紐分析表的PivotFields。

語法

運算式。CreatePivotFields

表達 代表 CubeField 物件的變數。

註解

在 OLAP 樞紐分析表中，PivotFields 必須等到對應的 CubeField 新增至樞紐分析表之後才會存在。 CreatePivotFields方法可讓使用者建立 CubeField 的所有 PivotField。 將 CubeField 新增到樞紐分析表之前，使用者也可以將篩選加入 PivotField 中，並在這些 PivotField 上設定屬性。

範例

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 支援與意見反應。