VBAでピボットテーブルは作れるものでしょうか

質問

2つ連続して質問してしまい申し訳ありません。
以下のようなExcelデータがあります。
このデータを用いて、ピボットテーブルを作りたいと考えています。

縦項目に変数A(氏名)、横項目に変数B(科目)
クロス表に示される値を変数C(得点)
としたいと考えています。
変数Dは過去の試験結果で今回は用いません。

手操作でのピボットテーブルは自分で作成できるのですが、今後のために
自動的に処理させる一環として、VBAのプログラムでピボットテーブルを
作成したいと考えています。
そのようなことは可能でしょうか？
もし可能でしたらどのようなコードになるのでしょうか。
お手数ですが、教えていただけると幸いです。
よろしくお願いいたします。

A　　　　B　C　　D
Ｘさん　国　60　65
Ｘさん　社　90　85
Ｘさん　数　70　55
Ｘさん　理　80　75
Ｘさん　英　65　70
Ｙさん　国　85　85
Ｙさん　社　95　90
Ｙさん　数　95　100
Ｙさん　理　90　90
Ｙさん　英　85　90
Ｚさん　国　55　60
Ｚさん　社　40　35
Ｚさん　数　40　50
Ｚさん　理　60　65
Ｚさん　英　35　30

回答No.1

xls88 · ベストアンサー

過去ログが参考になるかも知れません。
マクロでピボットテーブルを作成するには？
http://oshiete1.goo.ne.jp/qa2926805.html

どこまで出来ているのか解らないのでなんですが、ピボットテーブル作成作業を「マクロの記録」すればいかがでしょうか。