Dim ws As Worksheet
Dim pt As PivotTable

For Each ws In ActiveWorkbook.Worksheets
For Each pt In ws.PivotTables
pt.HasAutoFormat = False
Next pt
Next ws


Hans Knudsen wrote:
I have a workbook (for training purposes) with many different pivot
tables. I want to uncheck AutoFormat table under Table Options
for each 'Refresh Data'.

Some help on the necessary code for that?

Regards
Hans Knudsen



--
Debra Dalgleish
Contextures
www.contextures.com/tiptech.html
Blog: http://blog.contextures.com