CubeField.CreatePivotFields Method

  • Article
Excel Developer Reference

The CreatePivotFields method is new in Microsoft Office Excel 2007. It enables users to apply a filter to PivotFields not yet added to the PivotTable by creating the corresponding PivotField object.

Version Information
 Version Added:  Excel 2007

Syntax

expression.CreatePivotFields

expression   A variable that represents a CubeField object.

Remarks

In OLAP PivotTables, PivotFields do not exist until the corresponding CubeField is added to the PivotTable. The CreatePivotFields method enables users to create all PivotFields of a CubeField. Users can also add filters to the PivotFields and set properties on them before the CubeField is added to the PivotTable.

Example

Visual Basic for Applications 
  Sub FilterFieldBeforeAddingItToPivotTable()
    ActiveSheet.PivotTables("PivotTable1").CubeFields("[Date].[Fiscal]").CreatePivotFields

 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Fiscal Year]").VisibleItemsList =

    Array("[Date].[Fiscal].[Fiscal Year].&[2003]", "[Date].[Fiscal].[Fiscal Year].&[2004]", "[Date].[Fiscal].[Fiscal Year].&[2005]")

ActiveSheet.PivotTables("PivotTable1").PivotFields( _
    "[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

See Also