エクセル ＶＢＡにて

デスクトップに置いた
[C:\Documents and Settings\既定\デスクトップ\db1.mdb]
というファイルをエクセルのＶＢＡで起動するにはどのようにしたらよいでしょうか

No.1 ベストアンサー 回答者： zap35 回答日時： 2007/09/29 19:13

いまAccessが使えないので確認していませんが、以下で開けませんか

Sub Macro1()
　　Set App = CreateObject("Access.Application")
　　App.OpenCurrentDatabase "C:\Documents and Settings\既定\デスクトップ\db1.mdb"
　　App.Visible = True
Exit Sub

この回答へのお礼

大変、大変ありがとうございます。
ずばり開けました。（但し　Exit sub⇒　end subでした。）
今回のコマンドはヘルプなど確認して今後の参考とさせていただきます。

お礼日時：2007/09/29 19:22