ADODB.Connecton и Excel

@snipe · Регистрация: 07.08.2013

Author24 — интернет-сервис помощи студентам

Доброго времени суток

Пытаюсь подцепить библиотеку ADO с Excel 2010
подключаюсь вот так

Visual Basic

Const adOpenStatic = 3
Const adLockOptimistic = 3
Const adCmdText = &H1
Set objConnection = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
objConnection.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=" & ActiveWorkbook.Path & "\Лист Microsoft Excel(3).xlsx" & ";" & _
"Extended Properties=""Excel 12.0;HDR=YES"";"

далее сборка запроса
ну и открытие рекордсета

прикол в том что в запросе приходится писать From [Лист1$]
т.е. в качестве исходной таблицы используется целый лист
по гуглил - нашел что можно еще подцепиться к именованному диапазону
но мне надо подключаться к определенному диапазону
причем размеры менять налету
По идее просится такая конструкция From [Лист1$a8:c10]
пытаюсь сделать - получаю ошибку - не найдено ядром
лезу на гугл нахожу такую конструкцию но там соединение ADO через других провайдеров
все хорошо но только для XLS а с XLSX работать не хотят

Люди добрые подскажите в какую сторону копать
Заранее спасибо

	03.12.2013, 06:35