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 · ベストアンサー

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

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/Excel/Worksheet/Worksheet04.html

お礼

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

回答No.1

bin-chan

Book2のOPENも記述する。

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

お礼

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