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
Ask a Question
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.