Worksheet.PivotTables (Excel)

Returns an pivottables that represents either a single PivotTable report (a PivotTable pivottables) or a collection of all the PivotTable reports (a PivotTables pivottables) on a worksheet. Read-only.

PivotTables (Index)

Index: The name or number of the report.

Dim pts As PivotTables
Set pts = ActiveSheet.PivotTables()