excel vba variable ссылки другая переменная

Question

Я пытаюсь настроить общий процесс в Excel VBA для обработки соединений и чтения баз данных.

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

Пример Приложение имеет переменную:

Dim cnDB1 As ADODB.Connection 
Dim cnDB2 as ADODB.Connection 

Я хотел бы передать «имя» переменной в качестве параметра и есть родовое обновления модуля значение.

Open_Database "cnDB1", strCnnnectionDetails1 
Open_Database "cnDB2", strConnectionDetails2 

Я делал это в VBS через Eval и Execute команды, но я не могу определить, как выполнить аналогичные действия в Excel VBA.

Answer 1

Я как-то ответил на это, просто определяя глобальное соединение ADODB, на которое я ссылаюсь в своем модуле. После того, как вызов будет выполнен, я передам глобальное значение в мое конкретное приложение.

Грязный обходной способ, но он работает.