HasAutoFormat Property Example
This example causes the PivotTable report to be automatically reformatted when it’s refreshed or when fields are moved.
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable pvtTable.HasAutoFormat = True