エクセルVBAからACCESSのマクロを複数実行したいと考えております。
但し、ACCESS上は大元のマクロにマクロ1、マクロ2というように複数登録しており、
エクセルVBAで動かすACCESSのマクロは、複数のマクロを登録した大元のマクロを動かしています。
そうした際に、
エクセルVBAから実行すると、
ACCESS上で「runmacro アクションの実行は取り消されました」とのエラーが出てしまいます。
エクセルVBA上では、オートメーションメーションエラーですとの表示が出てしまいます。
他方、エクセルVBAをかまさず、ACCESSから大元のマクロを実行する分にはエラーが出ない状況です。
お知恵を貸していただけますと幸いです...
コードは以下のとおりです。
#エクセルVBAのコード Sub access2() Application.ScreenUpdating = False Dim oAcc As Object Dim sPath As String 'MDBパス sPath = "*****" 'MDBオープン Set oAcc = CreateObject("Access.Application") Call oAcc.OpenCurrentDatabase(sPath) With oAcc .Run "実行" .CloseCurrentDatabase '閉じる .Quit End With Set oAcc = Nothing MsgBox "完了しました" End Sub
#ACCESS上のコード Public Sub 実行() #このマクロには、複数のマクロを動かすように設定しています DoCmd.RunMacro "マクロ" End Sub
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2020/01/31 03:48
2020/01/31 04:10
2020/01/31 04:34 編集
2020/01/31 06:01
2020/01/31 06:04
2020/01/31 09:36
2020/02/04 23:39 編集
2020/02/05 00:10
2020/02/05 03:11