Всем ДВС!
В макросе excel прописан код
На некоторых компьютерах на последней строке ошибка "Операция не поддерживается для объектов данного типа".
На всех компах Win 10-64, Excell 2016 (32)
С DAO тоже пробовал, ошибка там же и такая же(
Пока сделал костыль на построчный импорт через RecordSet, но время увеличилось на порядок для небольших таблиц (около четырехсот строк), боюсь представить что будет на файлах, где строк за десяток тысяч. На большей части компов где код импорта всего листа работает, импорт даже больших файлов занимает меньше секунды.
Из-за чего может быть ошибка?
Может еще есть способ импорта сразу всего листа?
В макросе excel прописан код
| Код |
|---|
Set conn = CreateObject("ADODB.Connection")
BDfile="\\БД\Данные.accdb"
conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & BDfile & ";"
Table_Name =1076
' Создание новой таблицы
strSQL = "CREATE TABLE [" & Table_Name & "] ([Компонент] TEXT, [Детектор] TEXT, [Площадь] DOUBLE)"
conn.Execute strSQL
' Вставка данных из Excel
xlFile = ThisWorkbook.path & "\" & ThisWorkbook.Name
strSQL = "INSERT INTO [" & Table_Name & "] SELECT * FROM [Данные$] IN '" & xlFile & "' [Excel 12.0; Xml; HDR=YES;]"
conn.Execute strSQL |
На всех компах Win 10-64, Excell 2016 (32)
С DAO тоже пробовал, ошибка там же и такая же(
Пока сделал костыль на построчный импорт через RecordSet, но время увеличилось на порядок для небольших таблиц (около четырехсот строк), боюсь представить что будет на файлах, где строк за десяток тысяч. На большей части компов где код импорта всего листа работает, импорт даже больших файлов занимает меньше секунды.
Из-за чего может быть ошибка?
Может еще есть способ импорта сразу всего листа?