Changing field settings on multiple columns in pivot report...How

You have brought up a pivot report but it defeaults to count for all columns.
Can you change all to max with one operation?

Thanks

You can't manually change all the calculations to MAX with one step.

You can change each field individually, by double-clicking on it, and
changing the summary function.

Or, you can use programming to change all the data fields. For example:

Sub MaxAllData()
'changes data fields to MAX

Dim pt As PivotTable
Dim pf As PivotField

For Each pt In ActiveSheet.PivotTables
For Each pf In pt.DataFields
pf.Function = xlMax
Next pf
Next pt

End Sub


Wayne wrote:
> You have brought up a pivot report but it defeaults to count for all columns.
> Can you change all to max with one operation?
>
> Thanks


--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html