VBからaccessを呼び出した際に引数を渡すには？

解決

いっき 2006-01-06 13:24:01 No: 129392

いつも参考にさせてもらっています。

VBからAccessを呼び出す時に引数を渡して呼び出したい。
色々と調べてみたのですが、方法がわかりません。
上記のことはVBで可能なのでしょうか？

開発環境はVB6+Access2003で行いっています。

ご存知の方いましたら、よろしくお願いします。

ks 2006-01-06 13:37:02 No: 129393

ご質問の意図がいまいちわかりません。

VBからAccessのmdbを開いて、その中にある関数を引数つきで呼び出したい。

という話でOKでしょうか？

特攻隊長まるるう 2006-01-06 13:45:39 No: 129394

同じく
>Accessを呼び出す時
というのが曖昧で意味はわかってませんが、マクロの関数を
呼び出すときに引数を渡すのは Run メソッドでできると思います。
過去ログに[Excel VBA]の質問が何回か出てると思います。
過去ログ検索『マクロ』でどうぞ。

Shell 起動時など、コマンドラインの引数をとる場合はVBAの
Command 関数が使えるかもしれません。

いっき 2006-01-06 13:56:35 No: 129395

わかりづらくて、すいません。

VBでEXEを呼び出す時に  Shell("A.exe" & " " & 引数)  で呼び出し、
呼びだれたEXE側で  変数=Command()  を使って引数を取得できるように
VB→AccessでもVBで使っていた変数をAccess側で使用できるようにしたいです。

Accessを呼び出す時は

Dim APPACCESS   As Object

Set APPACCESS = CreateObject("Access.Application")

With APPACCESS
    .OpenCurrentDatabase 〜.mdb
    .Visible = True
    .UserControl = True
End With

としています。

もげ 2006-01-06 14:05:57 No: 129396

>VBでEXEを呼び出す時に Shell("A.exe" & " " & 引数) で呼び出し、
>呼びだれたEXE側で変数=Command() を使って引数を取得できるように
Accessでも可能ですよ。
Shell関数でMSACCESS.EXEを呼べばよろしいかと。
http://www.accessclub.jp/bbs2/0037/beginter12103.html

いっき 2006-01-06 16:36:51 No: 129397

>>もげさん

うまくいきました。
ありがとうございます。