tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル VB6でACCESSのマクロ起動
投稿日: 2008/08/08(Fri) 16:29
投稿者tetsu
VB6でACCESSの 性別指定 というマクロを起動させたいのですが、


Dim obj As Object
Set obj = CreateObject("Access.Application")
obj.OpenCurrentDatabase App.Path & "C:\藤谷 徹\meishi.mdb"
obj.Visible = True
obj.Application.Run "性別指定"
Set obj = Nothing

で実行すると 実行時エラー'7866' データベースファイルがないか、他のユーザーが排他モードで開いているため、このデータベースを開くことができません。 と表示されます。

どうすればよろしいのでしょうか??

ちなみに 性別指定 というマクロは、テキストボックスの値をよみ、値が男なら男だけのレコードを抽出したレポートを開き、印刷するというマクロです。
フォームにOKボタンを設置し、OKボタンクリック時に起動するようにしています。

これをVB6でつくったフォームで、同じようにクリックしたらマクロ起動しのレポートが表示され、印刷できるようにしたいのです。

みなさまどうか宜しくお願い致します。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。