エクセルのマクロで複数のシートのコピー

質問

エクセル初心者です。
私の場合、3から5社のフォルダが作ってあり、それぞれ、エクセルで、日々の入出庫の管理＆集計をしています。
3社のフォルダより、指定ファイル・シート内のデータをピボットテーブル用集計シートにコピー貼り付けしたいのです。
ピボットテーブル機能で複数のシートを選択するのはシート数が多すぎて手間。
マクロによって、集計シートにまとめてから、ピボットテーブル機能を使いたい。

各社シートのフォームは同じ.。
日付けを指定してコピー貼り付けしたい。
集計シートに各社連続で貼り付けがしたい。
集計シートの最初の行だけにタイトルを表示したい。
なるべく、フォームの行・列幅は変更しないようにしたい。
貼り付けたデータのユーザー名がわかるようにしたい。

なにとぞ、お力をお貸しください。
よろしくお願いいたします。
エクセル2003

回答No.1

yy_kd

回答が無いようなので下記を参照してみてください。
複数Bookのシートを１枚に合成（コピーですが）することを
目的に開発しました。ご希望に沿えば良いのですが・・・

http://communicationservice.web.fc2.com/filesrcV24.zip