Access終了後にExcelを立ち上げたい

質問

先日引き継いだ仕事で、Ａｃｃｅｓｓで作業を終了して、Ｅｘｃｌｅで次の作業を行うのですが、前々任者が、ＭＳ－ＤＯＳのＢＡＴファイルで起動させるようにマクロを作ってあります。それで、Ｅｘｃｅｌのマクロを立ち上げるには、ボタン？を押す動作が必要です。以前は、それでも良かったのかと思いますが、今では、全てのＥｘｃｅｌのマクロが終わるのに３０分以上かかり、その間に何度もボタンを押さなくてはなりません。(ＰＣの前で見ていなくてはならない)
　Ａｃｃｅｓｓ終了後に、Ｅｘｃｅｌを立ち上げそのままそのワークシートについているマクロを走らせる方法はないのでしょうか？
　Ｅｘｃｅｌのマクロが終了して、次のマクロを走らせる方法は、教えていただいて成功したのですが。

回答No.1

noname#29107 · ベストアンサー

BATファイルから呼び出すEXCELで、自動的にマクロを実行したいということですか？

BATファイルの内容の例：
"C:\Program Files\Microsoft Office\Office10\EXCEL.EXE" "C:\temp\TestBk3.xls"

この場合、TestBk3.xlsで、自動実行させたいマクロをAuto_Openという名前で保存する。

お礼

ありがとうございました。うまくいきました。
Auto_Openは結構使えそうですね。

回答No.2

popokun

VBAだけを使ってやる場合。
※ソースが汚いのは、気にするな！

Dim vPath As String 'EXCELのパス名
Dim RetVal As String

If MsgBox("システムを終了します。", vbYesNo + vbDefaultButton2, " bye bye(^o^)/~ ") = vbYes Then
vPath = "c:\test.xls"
'↓のC:\Program Files\Microsoft Office\～ってやつは端末によって違うよ。EXCEL.EXEで
'検索してみれば似たような場所にあると思う。
RetVal = Shell("""" & "C:\Program Files\Microsoft Office\Office\EXCEL.EXE" & """" _
& """" & vPath & """", 1)
DoCmd.Quit
End If

お礼

ありがとうございました。
　でも、このソース難しくて意味がわからない！今後勉強して参考にさせていただきます。