Redefines the layout of the fields in the existing Table, apart from the data field : PivotTable « Excel « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Excel
  3. PivotTable

Redefines the layout of the fields in the existing Table, apart from the data field

 
     Sub RedefinePivotTable()
         Dim pvt As PivotTable
         Set pvt = ActiveSheet.PivotTables(1)
         pvt.AddFields RowFields:=Array("Product", "Customer"), _
                      ColumnFields:="State", _
                      PageFields:="Date"
     End Sub








Related examples in the same category

1.Create Pivot Table From database
2.Modifying Pivot Tables
3.Creating a PivotTable Report
4.PivotTables Collection
5.Assign a value to the Orientation property of the PivotField object, as shown here:
6.Add data field to PivotTable
7.Visible Property
8.add calculated items to a field using the Add method of the CalculatedItems collection
9.remove the CalculatedItem by deleting it from either the CalculatedItems collection or the PivotItems collection of the PivotField:
10.adds a PivotTable based on the data from an Access database