ピボットテーブルの操作をマクロの記録で

質問

退職者が残したエクセルファイルがあります。
ピボットテーブル生成の操作をマクロの記録を使って自動化したようです。
私はピボットテーブルを一度も操作した事が有りません。
ですがマクロの記録で作られた構文を
VBEのF8キーで1行づつ動作させると画面が変化していくので
どういう操作をしてマクロの構文が出来たのかは分かりました。
ですが以下の部分だけ画面上の変化が無く何をどうすると
この構文が作成されるのかまったく分かりません。
ピボットテーブルに関する件を検索しようにも
マクロを使わない手操作でどういう操作、どういう機能を使ったのかが
わからないので検索する事も出来ません。
ピボットテーブルウィザードから
ワークシートが挿入されてテーブルを作成する際に
どういう操作を行うとこのような構文が出来るのか
教えてください。お願いします。

With ActiveSheet.PivotTables("ピボットテーブル1").PivotFields("品番")
.PivotItems("(空白)").Visible = False
End With
With ActiveSheet.PivotTables("ピボットテーブル1").PivotFields("仕入先")
.PivotItems("(空白)").Visible = False
End With
With ActiveSheet.PivotTables("ピボットテーブル1").PivotFields("品名")
.PivotItems("(空白)").Visible = False
End With
With ActiveSheet.PivotTables("ピボットテーブル1").PivotFields("棚番")
.PivotItems("(空白)").Visible = False
End With
With ActiveSheet.PivotTables("ピボットテーブル1").PivotFields("番号")
.PivotItems("(空白)").Visible = False
End With

回答No.1

MackyNo1 · ベストアンサー

エクセルのバージョンが記載されていませんので一般論になりますが、「(空白）」と書かれたデータを表示しない設定にすれば、表示されたコードになります。

具体的には、系列名の右の▼をクリックして「（空白）」のチェックを外すか、「（空白）」のセルで右クリックして「表示しない」を選択してください。

お礼

エクセルは２００３－ＳＰ３です。
マクロの記録で
教えていただいたように操作したら
同じコードが出来上がりました。

どうもありがとうございました。