Workbook.PivotTables (Excel)

Renvoie un Object qui représente une collection de tous les rapports de tableau croisé dynamique dans une feuille de calcul. En lecture seule.

Dim ptsPivotTables As PivotTables
Set ptsPivotTables = ActiveWorkbook.PivotTables