ピポットテーブルを逐次更新するには
 フォームのボタンをクリックすると、ピポットテーブルを作成するマクロを
作成したものの、1回目のピポットテーブル作成は問題無いが、2回目以降うまく
いかない、といった場合、ちょっと発想を変えてみましょう。

 ピポットテーブルは、基本的に1回作成してしまえば、
後は更新ボタンを押すだけで最新のデータがテーブルに反映されるように
設計されています。

 VBA的に言うと、RefreshTableメソッドを実行するだけで
最新のデータがピポットテーブルに反映されるはずです。
 そこで、発想を変えて、マクロでピポットテーブルを何回も作成するのはやめて
その代わりに、

(1)ピボットテーブルのデータ元をExcelに再認識させる
   (元となるデータは当然増減しますから)

(2)RefreshTableメソッドでピボットテーブルを最新の情報に更新する

の2ステップを踏めば、毎回マクロでピボットテーブルを作成する
必要はなくなるんじゃないでしょうか?

Excel97



戻る


Excel Word Access VBA! モーグ