PivotTable.ShowPages (Excel)
Creates a new PivotTable report for each item in the page field. Each new report is created on a new worksheet.
This method isn't available for OLAP data sources.
ShowPages (PageField)
PageField: A string that names a single page field in the report.
Dim booShowPages As Boolean
booShowPages = ActiveCell.PivotTable.ShowPages()