Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 11 Pro : Excel 2021)
ExcelからAccessの標準モジュールを呼び出す方法について
投稿日時: 24/02/05 09:24:18
投稿者: suekun9999

お世話になっております。
下記のようにして、ExcelからAccessの標準モジュールを呼び出そうとしますが
「SUBモジュール名」が見つかりません。
となり呼び出すことが出来ません。
(1)Accessは閉じた状態にしても同じでした。
(2)モジュール名を英語表示にしても同じでした。
ご教示をお願いいたします。

投稿日時: 24/02/05 10:03:17
投稿者: suekun9999

suekun9999 さんの引用:
お世話になっております。
下記のようにして、ExcelからAccessの標準モジュールを呼び出そうとしますが
「SUBモジュール名」が見つかりません。
となり呼び出すことが出来ません。
(1)Accessは閉じた状態にしても同じでした。
(2)モジュール名を英語表示にしても同じでした。
ご教示をお願いいたします。

 
ソースを忘れておりました。
  
    Set objAC = CreateObject("Access.Application")
    objAC.OpenCurrentDatabase ThisWorkbook.Path & "\aaa.accdb"
    objAC.Visible = True
    objAC.Run ("SUBモジュール名")
  
です。

投稿日時: 24/02/05 15:32:07
投稿者: suekun9999

suekun9999 さんの引用:
suekun9999 さんの引用:
お世話になっております。
下記のようにして、ExcelからAccessの標準モジュールを呼び出そうとしますが
「SUBモジュール名」が見つかりません。
となり呼び出すことが出来ません。
(1)Accessは閉じた状態にしても同じでした。
(2)モジュール名を英語表示にしても同じでした。
ご教示をお願いいたします。

 
ソースを忘れておりました。
  
    Set objAC = CreateObject("Access.Application")
    objAC.OpenCurrentDatabase ThisWorkbook.Path & "\aaa.accdb"
    objAC.Visible = True
    objAC.Run ("SUBモジュール名")
  
です。

 
 objAC.Run ("SUBモジュール名")

 objAC.Run ("プロジェクト名.SUBモジュール名")
に変更したところ、うまく呼び出すことが出来ました。
ありがとうございました。
参考文献
https://qiita.com/RODA/items/356c19a7f61dd3addb55