PivotTableWizard Method Example
This example creates a new PivotTable report from a Microsoft Excel database (contained in the range A1:C100).
ActiveSheet.PivotTableWizard xlDatabase, Range("A1:C100")