こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

CreateObjectでファイルを開く

お世話になります。

下記のVBAで作成した「oApp」をその後の処理で使用しています。

---------------------------------------------------------
Set oApp = CreateObject("Excel.Application")
oApp.Workbooks.Open FileName:=CurrentProject.Path & "\メイン.xls"
---------------------------------------------------------
現在は、閉じたメイン.xlsを開いて「oApp」を取得しているのですが、
わざわざメイン.xlsを閉じるのではなく、開かれたままメイン.xlsをoAppとして
処理したいのです。

どのよにすれば、すでに開かれているメイン.xlsをoAppに
割り当てることができるでしょうか?

なにとぞよろしくお願いします。

投稿日時 - 2013-10-19 11:48:48

QNo.8311717

すぐに回答ほしいです

質問者が選んだベストアンサー

No1の補足です。

Sub Sample2()

Dim oApp As Workbook

Set oApp = Workbooks("Book1.xls")

oApp.Sheets("Sheet3").Range("A1").Value = "AAA"

End Sub

こちらでもよろしいのではないでしょうか。

投稿日時 - 2013-10-19 13:11:20

お礼

ありがとうございます!!!!!
正常に開けました!!!

投稿日時 - 2013-10-21 12:20:46

ANo.2

このQ&Aは役に立ちましたか?

6人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.1

Sub Sample()

Dim oApp As Object

Set oApp = CreateObject("C:\test\Book1.xls")

oApp.Sheets("Sheet3").Range("A1").Value = "AAA"

End Sub

でいけそうですけど。開いてないとバッググラウンドの非表示で開きます。

投稿日時 - 2013-10-19 12:44:53

お礼

ありがとうございます!!!

投稿日時 - 2013-10-19 14:08:00

あなたにオススメの質問