Excel VBA別ブックのシートをコピーするには

Excel2010のVBAで別ブックのシートをコピーしてくる方法

Excelファイル(C:\test\BOOK2.xls)のシート名が
TESTというシートを自分のExcelファイル(C:\doc\BOOK1.xls)に
コピーするにはどのように記述すればよいのでしょうか。

・コピー先:自分のExcelファイル(C:\doc\BOOK1.xls)
　VBAのコードがあるファイルです
・コピー元:C:\test\BOOK2.xlsのTESTシート
　なお、TESTシートを持つ同じ名前(BOOK2.xls)のファイルが
　別フォルダにもあります
　
Workbooks( )の引数にファイル名(BOOK2.xls)は指定できるのですが、
フルパス名(C:\test\BOOK2.xls)で指定できないので困っています。

No.2 ベストアンサー 回答者： kotaro2014 回答日時： 2014/02/17 23:36

http://www016.upp.so-net.ne.jp/cheetah/xlvba/Exc … に書いてある方法はどうでしょうか。

Set wb1 = Application.Workbooks.Add
Set wb2 = Application.Workbooks.Add

のところを

Set wb1 = Application.Workbooks.Open(Filename:="ファイル名")
Set wb1 = Application.Workbooks.Open(Filename:="ファイル名")

のように書き換えれば出来ると思います。

参考URL：http://www016.upp.so-net.ne.jp/cheetah/xlvba/Exc …

この回答へのお礼

教えていただきました方法で、フルパス名での指定ができて
シートをコピーすることもできました。ありがとうございました。

お礼日時：2014/02/18 19:48

No.1 回答者： bin-chan 回答日時： 2014/02/17 22:07

Book2のOPENも記述する。

シートコピーは「マクロの記録」すれば良いと思います。

この回答へのお礼

自動生成されたコードにWorkbooks( )が使われていて、
このメソッドの引数にフルパス名での指定ができませんでした。
でも2つのExcel間でもマクロの記録が使えることが分かりましたので
今後の参考にさせていただきます。ありがとうございました。

お礼日時：2014/02/18 19:46