VBからACCESSのマクロを起動できますか？

VB６でACCESSのテーブルを参照しています。
そのMDBの中にあるマクロをVB側から起動できないでしょうか？
教えてください。
宜しくお願いいたします。

No.2 ベストアンサー 回答者： tsukasa-12r 回答日時： 2007/06/15 21:48

ちょっとまわりくどいですが、

MDB 内のモジュールで
Public Function Test()
DoCmd.RunMacro ("マクロ1")
End Function
のようにしておき、
VB 側からこれを
Private Sub CommandButton1_Click()
Dim aa As Access.Application
Set aa = GetObject("D:\Test\db1.mdb")
aa.Run "Test"
End Sub
のようにしてやればマクロ1 を呼び出すことができると思います。
( 上記の方法で Excell 2000 から Access 2000 のマクロを呼び出せるのは確認しました。VB でも可能だと思います。Access 2002 以降では確認していないのですが、Access.Application に RunMacro というメソッドが追加されていれば、それを使用して直接マクロを実行することが可能だと思います。)

この回答への補足

>Dim aa As Access.Application
VBでこの部分で”ユーザ定義型は定義されていません”のエラーが出ます。

Dim aa As Excel.Application
は通ります。
Access.ApplicationはVBで認められてないのでしょうか？

補足日時：2007/06/26 13:24

No.3 回答者： tsukasa-12r 回答日時： 2007/06/29 00:25

>>Dim aa As Access.Application

>VBでこの部分で”ユーザ定義型は定義されていません”のエラーが出ます。

次のどちらかの方法で解決できると思います。
(A) As Access.Application → As Object に変更
(B) Excel のメニューの「ツール」→「マクロ」→「 Visual Basic Editor」→「ツール」→「参照設定」→「 Microsoft Access X.X Object Library 」にチェック

この回答へのお礼

出来ました。
（ａ）を試したらできました。
そのあと（ｂ）もしておきました。
本当にありがとうございました。
ｍ（＿＿）ｍ　　（＾～＾）

お礼日時：2007/06/29 14:56

No.1 回答者： m-toshi 回答日時： 2007/06/15 12:47

即答になりますが、できません。

(^^;
出来るのは、テーブルとクエリーのみです。
そっけない回答で申し訳ないのですが、
事実です。

この回答へのお礼

ありがとうございました。
遠回りしないですみました。

お礼日時：2007/06/15 14:34