閉じているBookに処理をさせるマクロ

Book1とBook2があり、Book1は開いていてBook2は閉じています。
Book1でマクロを実行し、Book2を開いてSheet1のA1に"A"を入力した後Book2を閉じる、という処理をさせることは可能でしょうか？
また、上記の処理をBook2を閉じたまま実行することは可能でしょうか？
可能でしたらそれぞれのマクロを教えてください。

No.1 ベストアンサー 回答者： marbin 回答日時： 2006/09/02 19:17

ブックを開く、処理する上書き保存、閉じる

という一連の作業です。
あたかも開いてないかのように画面再描画の
停止、再開も行っています。

Sub test()
Dim wb1 As Workbook
Dim wb2 As Workbook
Dim bmei As String
Set wb1 = ThisWorkbook
bmei = "D:\marbin\test.xls"
Application.ScreenUpdating = False
Set wb2 = Workbooks.Open(bmei)
wb2.Sheets("Sheet1").Range("A1").Value = "A"
wb2.Save
wb2.Close
Application.ScreenUpdating = True
End Sub

この回答へのお礼

有難うございます。

お礼日時：2006/09/02 20:59