Application.run не работает с модулем

Question

У меня есть два модуля. В одном модуле я хочу косвенно использовать вспомогательный модуль из другого модуля. Согласно MS и множеству онлайн-ресурсов, это должно работать, но это не так. В чем может быть проблема?

'Module: "Helpers" 

Public Sub ubTest() 
    MsgBox "ubTest is called" 
End Sub 


'Another Module -> I also tried this from a form and a class... 

Public Sub test() 
    Dim s As String 
    Helpers.ubTest    'works 

    s = "ubTest" 
    Application.Run s  'works 

    s = "Helpers.ubTest" 
    Application.Run s  'doesn't work 

End Sub 

(Очевидно, это тест - в реальном приложении у меня будет несколько модулей и не всегда есть контроль над именами процедур - так что я должен использовать модуль префикс)

Я пытался/декомпилировать и скомбинировать базу данных - тоже не повезло.

Answer 1

Доступ Application.Run Метод раздел справки говорит это о Имя параметра:

«Если вы вызываете процедуру в другую базу данных использовать имя проекта и имя процедуры, разделенные точкой в форме: «projectname.procedurename».

Так что я думаю, когда вы поставляете "modulename.procedurename" (т.е. «Helpers.ubTest»), доступ думает ваш имя_модуля это имя проекта VBA. Так как он не может найти проект под названием Помощники, он выдает ошибку # 2517, «... не может найти процедуру" Helpers.ubTest.»

К сожалению, я не могу найти способ сделать то, что я думаю, вы хотите с Application.Run. Я надеялся, что "projectname.modulename.procedurename" будет работать, но это также вызвало ошибку 2517.