MyTetra Share
Делитесь знаниями!
ADO SQL INSERT INTO в другой Excel, Вставить данные из текущего файла в другой файл
30.07.2019
00:03
Текстовые метки: VBA ADO, Excel<>Excel
Раздел: !Закладки - VBA - Access - ADO

Что-то вы как-то не так запрос на добавления записей в существующую таблицу формируете. Последняя версия так вообще создание таблицы из запроса, и имена листов указываете не верно. :)

Пример на статичных путях к файлам

Public Sub test()

    Dim pConn As Object

    Dim sSQL As String

    Set pConn = CreateObject("ADODB.Connection")

    pConn.Open "DBQ=c:\Path\Тест Шаблон.xlsb;Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};ReadOnly=0;"

    sSQL = "Insert Into [Встречи$]"

    sSQL = sSQL & " Select * From [Excel 12.0;Database=c:\Path\Первый файл.xlsb].[Встречи$]"

    pConn.Execute sSQL, 128

    pConn.Close

End Sub

Так же в этом разделе:
 
MyTetra Share v.0.52
Яндекс индекс цитирования