ACCESS(VBA)でエクセルファイルを開く時

質問

ＶＢＡでエクセルファイルを開いて処理していますが
一つのエクセルファイルを開いている時に（これは手操作）
ＶＢＡからエクセルファイルを開くと
一瞬、開いたような反応を示すのですが
すご、閉じてしまい
用を足しません
こんな時、ＶＢＡで今開こうとするエクセルファイルを
優先的に開けたら、と思いますが
むりでしょうか？
よろしくお願いします

回答No.1

pkh4989 · ベストアンサー

以下の方法で開けませんか？

Sub ExcelCreate()
Set MyExcel = CreateObject("excel.application")
'MyExcel.Workbooks.Open FileName:="C:\test.xls" '<---既存のエクセルブックを開く場合
MyExcel.Workbooks.Add '<---新しくエクセルを生成する場合
MyExcel.Visible = True
End Sub

お礼

回答ありがとうございました

回答No.2

Wendy02

こんばんは。

どんなコードか分かりませんが、いつもとパターンは同じではないのではありませんか？

maaaaさんへの過去の自分の書いた回答を読み直してみました。もう、同じことを書いても口説くなるので、割愛します。

Excelを開いているのですから、GetObject で、Class名側に、Excel.Application で取るか、直接ブック名で、オブジェクトを取得するか、どちらかにすればよいと思います。私は、賛成しなかったけれども、Access流？それとも、AccessClub流で、直接ブック・オブジェクトを取っていましたね。その方法で、たぶん確信を持ってやっていらっしゃると思いました。ただし、ブック・オブジェクトを直接取る場合は、気をつけないと、そのブック自体を閉じると、そのブックのVBProject だけを残してしまう可能性があります。

しかし、今回のような場合は、特に、Excel Applicationオブジェクトがあるのですから、GetObject で、それを取る方法で良いはずです。コードは、すでにお分かりのはずです。

お礼

回答ありがとうございました