エクセルで、３つのブックの中にある表（表は同じ形式）を別の新規ブックに1回で貼り付ける事はできますか？

こんにちは、みなさん！！

【質問】３つのブックがあります。この中には全く同じフォームの
表がはいっています。表の中身の数字は違います。

そこで、この３つのブックの中にある、それぞれの表を1枚のシート
に全て貼り付けたいと考えています。

もちろん、３つのブックと、貼り付ける新規のブックを開いて、３つのブックから１つづ表をコピーして張り付ければできます。

しかし、効率的な方法はないかと模索しています。実際はブックの
数も３つではなくたくさんありまうので。

★ご存知の方いらっしゃいましたらよろしくお願いします。

No.2 ベストアンサー 回答者： FUURINKAASAN 回答日時： 2006/12/14 02:04

＞３つのブックの中にある、それぞれの表を1枚のシートに全て貼り付けたい

つまり３つの表を新規ブックの一枚のシートに横方向か縦方向かに順番に貼り付けていくのですね。

考え方はＶＢＡで

参照するＢＯＯＫをＢＯＯＫ１～３とすると
(1)新規ＢＯＯＫを開いた状態で、
(2)ＢＯＯＫ１の表をコピーして、新規ＢＯＯＫの所定番地に貼り付ける。
(3)ＢＯＯＫ２の表をコピーして、新規ＢＯＯＫの所定番地に貼り付ける。
(4)ＢＯＯＫ３の表をコピーして、新規ＢＯＯＫの所定番地に貼り付ける。


これだけをＶＢＡで作るだけです。
ＶＢＡがだめならエクセルにはマクロ記録の機能があるから
(1)の状態で(2)～(4)を実際に操作してマクロの記録をする。
つぎにマクロボタンにそのマクロを登録して新規ＢＯＯＫに配置すればＯＫです。

ＢＯＯＫが３つ以上でＮ個あるなら
上記の(2)～(4)をＦＯＲ～ＮＥＸＴ、ＤＯ～ＬＯＯＰで
1からＮの繰り返し処理をさせればいいです。

たぶん誰かがＶＢＡで書いた回答を投稿してくれるでしょうが、その方のポリシーでプログラムを書きます。
それよりも質問者がＶＢＡを勉強されて、質問者の考え方でＶＢＡを作られた方が修正がしやすいとおもいます。

質問文だけでは
(1)ＢＯＯＫ１～３の表の位置：どこのセルからどこのセルまでか、シートは何枚で何枚目シートか
(2)新規ＢＯＯＫの貼り付け番地はどこか

などの情報がないからＶＢＡでも答えられないでしょう。
たとえばの回答が来ても質問者の実際のエクセルの番地とのズレがあった場合、修正できればいいのですけど。

ＶＢＡやマクロは理解されてるのでしょうか？

No.1 回答者： Cupper 回答日時： 2006/12/14 00:50

ＶＢＡで手順を記述するくらいしか、一発で行なう回答は無いと思います。

しかし、マクロを記述するほうが早いか、一つずつコピーするほうが早いかは分かりません。

一回目のコピーを記録マクロで記録してＣｔｒｌ+＠などに割付け、二回目からはそのマクロをＣｔｒｌ+＠で呼び出しコピーを行なえば少しは手間が省けると思いますがどうでしょう。