Creates a new PivotTable report for each item in the page field. Each new report is created on a new worksheet.
expression.ShowPages(PageField)
expression Required. An expression that returns a PivotTable object.
PageField Optional Variant. A string that names a single page field in the report.
Remarks
This method isn’t available for OLAP data sources.
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"