Наличие функции Excel с подключением VBA к SQL-проблеме - Ошибка компиляции

Question

Привет! Я пытаюсь запустить функцию в своей таблице Excel, где через функцию выполняется запрос и генерируются данные, но мне удалось исправить запрос, который работает, когда я использую в SQL, но когда я запускаю функцию из Excel Я получаю следующую ошибку:

Ошибка компиляции: пользовательский тип не определен.

ошибка, которую я получаю в EXCEL VB:

Я выполняю функцию:

Function Download_Standard_BOM(Query As String)
    Dim cnn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    Dim ConnectionString As String
    Dim StrQuery As String

    ConnectionString = "Driver={SQL Server};Server=STORESYSTEM 
;Database=STORE;Trusted_Connection=Yes;"

    cnn.Open ConnectionString
    StrQuery = Query 'Sheets("Tests Scenario").Range("J2").Offset(i, 0).Value
    cnn.CommandTimeout = 100
    rst.Open StrQuery, cnn, adOpenStatic, adLockOptimistic
    Download_Standard_BOM = rst("NAME")
End Function

и SQL-запрос, который я выполняю:

SELECT TOP 1 NAME
FROM [SERVER].[dbo].[STORE]
WHERE SecurityE = 'SGX' AND
      Trans = ' 0' AND
      Type = '9' AND
      Status = '0' AND
      SubId = 'Reversal'

Answer 1

Убедитесь, что вы включили ссылку на

Объекты данных Microsoft ActiveX 2.1 Библиотека