ピボットテーブルの合計行を非表示にするにはどうすればよいですか？

Question

私は現在、ピボットテーブルに別のExcelファイルの行をインポートするプロジェクトに取り組んでいます。ピボットテーブルには合計行（チェックボックスのおかげで削除できます）が含まれていますが、vbaで自動的に実行したいと思います。この行を削除して取り除くことができるコードを知っていますか？

ありがとうございます。

Answer 1

これを尋ねる前にマクロを録音してみましたか？私はちょうどこれを行い、次を得ました：

With ActiveSheet.PivotTables("PivotTable1") 
    .ColumnGrand = False 
    .RowGrand = False 
End With 

これをシートとピボットテーブルに合わせてください。