add calculated items to a field using the Add method of the CalculatedItems collection : PivotTable « Excel « VBA / Excel / Access / Word






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

add calculated items to a field using the Add method of the CalculatedItems collection

 
     Sub AddCalculatedItem()
     With ActiveSheet.PivotTables(1).PivotFields("Product")
         .CalculatedItems.Add Name:="Melons", Formula:="=Mangoes*1.5"
     End With

     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.Redefines the layout of the fields in the existing Table, apart from the data field
7.Add data field to PivotTable
8.Visible Property
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