ピボットテーブルから値を取得  Sub test()' ピボットテーブルから値を取得    Debug.Print ActiveSheet.PivotTables(1···