日日操夜夜添-日日操影院-日日草夜夜操-日日干干-精品一区二区三区波多野结衣-精品一区二区三区高清免费不卡

如果需要更改Excel數據透視表數值區域中字段的值匯總方式，在字段較多的情況下，手動逐一更改顯得有些繁瑣。用下面的VBA代碼可快速批量更改全部數據字段的值匯總方式。例如要將當前工作表中第一個數據透視表的所有數據字段值匯總方式改為“求和”，方法如下：

按Alt+F11，打開VBA編輯器，在代碼窗口中粘貼下列代碼：

Sub SumDataFields()
Dim ptField As PivotField
For Each ptField In ActiveSheet.PivotTables(1).DataFields
With ptField
.Function = xlSum
.Caption = "求和項:" & .SourceName
End With
Next
End Sub

關閉VBA編輯器，返回Excel工作表界面，按Alt+F8，打開“宏”對話框，選擇“SumDataFields”宏執行即可。