有時Excel數據透視表中的值字段較多，我這有64個值字段，因爲數據默認彙總方式是“求和”。如果要全部更改其彙總方式，如將下圖數據透視表中所有值字段的彙總方式由“求和”改爲“平均值”，手動逐個修改費時費力。
Excel雖沒有提供直接的批量更改方法，但在Excel 中，用一行VBA代碼可快速實現批量更改，方法是：
（1）打開VBA編輯器，打開“窗口”
在視圖-下有“宏”選項
輸入宏名字，點擊創建
再在窗口輸入：For Each pf In ActiveSheet.PivotTables("數據透視表1").DataFields: pf.Function = xlAverage: Next
點擊運行即可
註釋：
1.“ActiveSheet.PivotTables("數據透視表1")”指定的數據透視表名稱爲“數據透視表1”，需根據實際進行修改。在Excel 2013中，通過選擇“數據透視表工具-分析”選項卡，在功能區的最左側可看到數據透視表的名稱。
2.“pf.Function = xlAverage”指定值字段彙總方式爲“平均值”。如果要按其他方式彙總，可參考下表進行修改：
xlSum 求和
xlCount 計數
xlAverage 平均值
xlMax 最大值
xlMin 最小值
xlProduct 乘積
xlCountNums 數值計數
xlStDev 標準偏差
xlStDevP 總體標準偏差
xlVar 方差
xlVarP 總體方差
xlUnknown 不指定任何彙總方式
如要將值字段的彙總方式批量改爲“最大值”，將代碼中“pf.Function = xlAverage”改爲“pf.Function = xlMax”。
3.彙總方式更改後，數據透視表中的字段名稱會自動更改，如“求和項:1月”自動改爲“平均值項:1月”，這在以前的版本中還需用其他語句來實現。