ShowPages Method Example

This example creates a new PivotTable report for each item in the page field, which is the field named “Country.”

Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
pvtTable.ShowPages "Country"