タイトル : Re^2: Access2010を起動してマクロを実行を実行した際のエラーについて 投稿日 : 2013/02/05(Tue) 09:28 投稿者 : まち
ご教示ありがとうございました! が、 > Dim objAccess As New Microsoft.Office.Interop.Access.Application これを記述すると名前空間が不適切というエラーになります。 InportsでMicrosoft.Office.Interop.Accessしても変わりませんでした。 (Microsoft Access 14.0 Object Libraryは参照設定済) 何か他に特別な記述が必要なのでしょうか。 質問ばかりで申し訳ございません。 宜しくお願い致します。 > > Dim objAccess As Object > > > > objAccess = CreateObject("Access.Application") > > objAccess.Visible = False > > objAccess.OpenCurrentDataBase("D:\Test.accdb") > > objAccess.DoCmd.RunMacro("mcr_Import") > > objAccess.CloseCurrentDataBase() > > objAccess = Nothing > > Access は使った事がないので...。 > > Access 2010 なら下記のようになるかと? > > Dim objAccess As New Microsoft.Office.Interop.Access.Application > objAccess.Visible = False > objAccess.OpenCurrentDatabase("D:\Test.accdb") > objAccess.DoCmd.RunMacro("mcr_Import") > objAccess.CloseCurrentDatabase() > objAccess.Quit() > objAccess = Nothing > > だめなようなら、下の3行をコメントにして試して見て下さい。 > マクロを実行してすぐ閉じるのはどうかと思うので。 > 又、Excel 同様解放処理が必要になりますので、COMオブジェクトの参照カウントの > デクリメント 処理を追加しておいて下さい。 |