Доступ к таблице и соединению листов Excel

Question

Мне нужно добавить последнюю запись доступа в таблицу Excel с заголовками из таблицы доступа, где столбец в таблице Excel (LAN) соответствует столбцу (LAN) в таблице доступа. Пока это мой код:

 qry = "Select (Select Call_Date from Tel_List Where t.LAN=Tel_List.LAN And Ctrl=(Select Max(Ctrl)  From Tel_List Where t.LAN=Tel_List.LAN)) From [Excel 12.0;HDR=Yes;Database=C:\Boda Boda Banja Ltd\Modules\Prototypes\UG RFIN UI 1.0.xlsm].[TEL_List$]t Inner Join Tel_List on t.LAN=Tel_List.LAN Where Ctrl=(Select Max(Ctrl) From Tel_List Where t.LAN=Tel_List.LAN)"

Код возвращает значения, но не добавляется к соответствующим строкам. Ниже приведен снимок экрана после извлечения даты предыдущего вызова из таблицы доступа.

Есть ли способ добавить данные в соответствующие строки?

Answer 1

Попробуйте

Const WORKBOOK = "C:\Boda Boda Banja Ltd\Modules\Prototypes\UG RFIN UI 1.0.xlsm"
Const SQL = "SELECT e.LAN, Max(a.Call_Date) " & _
            "FROM Tel_List AS a " & _
            "INNER JOIN [Excel 12.0;HDR=Yes;Database=" & WORKBOOK & "].[TEL_List$] AS e " & _
            "ON a.LAN = e.LAN " & _
            "GROUP BY e.LAN;"