PivotTables Collection : PivotTable « Excel « VBA / Excel / Access / Word

PivotTables Collection

     Sub AddTable()
         Dim pvc As PivotCache
         Dim pvt As PivotTable
         Set pvc = ActiveWorkbook.PivotCaches(1)
         Set pvt = ActiveSheet.PivotTables.Add(PivotCache:=pvc,                  TableDestination:=Range("A3"))
     End Sub


Related examples in the same category

1.Create Pivot Table From database
2.Modifying Pivot Tables
3.Creating a PivotTable Report
4.Assign a value to the Orientation property of the PivotField object, as shown here:
5.Redefines the layout of the fields in the existing Table, apart from the data field
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