マクロ 別ファイルのシートを定義するには

質問

EXCEL2000でマクロを組んでいます。

マクロを組んでいるファイルと同じフォルダにある別ファイル"Book1.xls"のシート"Sheet1"を変数で定義したいのですが、構文がわかりません。

また、この場合、型は"worksheet"で良いのでしょうか。

回答No.2

imogasi · ベストアンサー

別ファイルでしたね。失礼しました。
ＤｉｍはWorksheetでしょう。
２ブックが同一フォルダ内の例。
Sub test01()
Dim sh1 As Worksheet
Dim sh2 As Worksheet
Set sh1 = Worksheets("sheet1")
Workbooks.Open "aa2.xls"
Set sh2 = Workbooks("aa2.xls").Worksheets("sheet2")
sh1.Cells(1, "B") = sh1.Cells(1, "A") + sh2.Cells(1, "A")
End Sub

お礼

ありがとうございました。

この回答をもとに、以前より念願だったマクロを完成させることができました。
本当に感謝しております。

また、色々お世話になることもあるかと思いますが、宜しくお願い致します。

回答No.1

imogasi

私が良くやる例
Sub test01()
Dim sh1 As Worksheet
Dim sh2 As Worksheet
Set sh1 = Worksheets("sheet1")
Set sh2 = Worksheets("sheet2")
sh1.Cells(1, "B") = sh1.Cells(1, "A") + sh2.Cells(1, "A")
End Sub
これでＳｈｅｅｔ１のＡ１に１、Ｓｈｅｅｔ２のＡ１に３
を入れて、実行するとＳｈｅｅｔ１のＢ１は４になります。
参考になりますでしょうか。

補足

いつもお世話になっております。
imogasiさんには、いつも色々教えていただき、非常に助かっています。感謝の言葉もございません。

ただ、今回いただきました回答は良くわかりませんでした。
これは、同じファイル内にあるシートではないのですか？
私はてっきり、「ThisWorkbook.Pathの"Book1.xls"の"Sheet1"」みたいな書き方をするのだと思っていたのですが・・・。
私の勘違いでしたら申し訳ないですが、教えていただけますでしょうか。