VB6.0からAccess2007のマクロを呼び出す方法について
VB6.0からAccess2007のマクロを呼び出す方法について教えてください。
[vb6.0のソース]
Private Sub ImportFile()
Dim AccessMacro As Access.Application
Set AccessMacro = GetObject("C:\test.mdb")
AccessMacro.Run "Import"
end Sub
[test.mdbのマクロ]
Public Sub Import()
DoCmd.TransferText acImportDelim, "test インポート定義", "test", "C:\test.csv", False
end Sub
上記の物を、XP+Access2003+VB6.0の環境でコンパイルし、Access2000が入っている環境で実行したところ、問題なくtest.mdbのマクロが実行できました。
(コンパイルした環境でも問題なく動作しました。)
ところがこれをWin2003 + Access2007環境で実行したところ、
『実行時エラー ４３２
オートメーションの操作中にファイル名またはクラス名をみつけられませんでした。』
と表示されます。
おそらく、GetObject("C:\test.mdb")のところでエラーになっているものと思われるのですが、どのようにすれば原因が解消できるかが全くわかりません。
どなたがご教示ください。
よろしくお願いいたします。
お礼
ありがとうございます。 試してみます。