【VBAマクロ】自動記録したピボットをwith文でとりあえず短くする

諸君はご存知だろうか。ピボットテーブル作成工程をマクロ自動記録すると、ゴミが生まれるということを。百聞は一見にしかず。ということで、まあ、まずはゴミっぷりを実際に見ていただこう。