Excel VBAからAccessマクロを実行したい

質問

Excel VBAからAccessマクロを実行する方法を知っている人がいましたら
教えてください。
よろしくおねがいしまっす！

回答No.2

tomotomo0906 · ベストアンサー

こんにちは

私もExcelVBAからACCESSのマクロを実行したことはないのですが以下の方法で
一応マクロは実行されました。

----------------------------------------------------------------

DB2.MDBには"メッセージ"というマクロが存在します。
"メッセージ"というマクロはメッセージボックスを表示しています

Dim objAccess As Object

''ACCESSオープン
Set objAccess = CreateObject("Access.Application")
Call objAccess.OpenCurrentDatabase("C:\db2.mdb")

'マクロの実行
objAccess.DoCmd.RunMacro "メッセージ"

''ACCESSクローズ
objAccess.CloseCurrentDatabase
Set objAccess = Nothing

----------------------------------------------------------------------

もっと良い方法があるのかもしれません

参考にしてみてください。

補足

うおぉぉぉぉぉぉぉぉ！！スゴイっす！！！
でっできましたっっ！！！
かっカ・ン・ゲ・キですっ！！！
どこのどなたか存じませんがすごい技を教えてくれてありがト～っです。
世界のみなさまっ！！ありがとうございましたっっ！！！！
うおぉぉぉぉぉぉぉぉぉぉぉぉ～！！

回答No.1

nika

Excel VBAからAccessマクロを直接起動させる方法は、わかりませんが、AccessマクロをAUTOEXECを使って起動する方法は、うまくいきます。
問題がなにかあるのでしょうか。

補足

うおぉぉぉぉ！！早速の回答ありがとうございますっ！！！
Excel帳票とAccessデータベースを連携させるシステムでCSVファイルをAccessのテーブルに読込みたいんですぅ。
そんでVBでゴリゴリ処理させるよりAccessのマクロを使ったほうが楽かなっと・・・。
というわけです。できますかねえぇ？？？