【ピボットテーブル】集計方法を一括で「平均」に変更する方法

こんにちは、おつな（ @by0027 ）です。

Excel（エクセル）でピボットテーブルを作成する際、値に入れた数値を「合計→平均」に変更したいとときありませんか？今回はそんなお悩みを解決します。

変更する項目が少ないときは、【値フィールドの設定】からひとつひとつ手作業で変更していけばいいのですが、それが何個も発生すると、嫌になってくるものです。同じ作業はできれば短縮したい・・・

そこで今回は、コピペでOK！ピボットテーブルの集計「合計→平均」に変更する方法するを紹介します。

パッと読むための目次

ピボットテーブルの集計方法を一括で変更する方法（完成図）
手順：値フィールドの設定を一括で「平均」に変更する（5STEP）
さいごに

ピボットテーブルの集計方法を一括で変更する方法（完成図）

調べてみたところ、集計方法を一括で変更する方法はマクロを使わないとできないようです。「マクロって難しそう・・・」と躊躇してしまいそうですが、基礎や基本がわからなくてもマクロはコピペで動かすことが可能です！

ぜひ、下の手順に沿ってマクロを動かし、時間短縮につなげてみてください。

手順：値フィールドの設定を一括で「平均」に変更する（5STEP）

STEP.1

ブックを開く

ピボットテーブルが作成されているブックを開きます。

STEP.2

【Alt】+【F11】

【Alt】+【F11】を押して、VBE（Visual Basic Editor：マクロを実行させたり記述する画面）を開きます。

STEP.3

【挿入】＞【標準モジュール】

【挿入】＞【標準モジュール】をクリックし、コードを記述する画面を開きます。

STEP.4

次のコードをコピーする

HTML


 Sub test()
     Dim pvtTable As PivotTable
     Dim pvtField As PivotField
     For Each pvtTable In ActiveSheet.PivotTables
         For Each pvtField In pvtTable.DataFields
            pvtField.Function = xlAverage
         Next pvtField
     Next pvtTable
 End Sub

STEP.5

コード記述画面に貼りつける