| Вопрос: Как перекачать данные с Excel в Access | Добавлено: 06.03.07 14:10 |
Автор вопроса:  Inna
|
|
Есть ли функция работающая с VB6, которая позволяет перекачивать данные с Excel в Access не построчно, а целиком, без циклов.
Т.е. такой код работает очень долго: With xlApp.ActiveWorkbook.ActiveSheet Do While .Cells(row, 1).Value > 0 rs_Table.AddNew rs_Table("Mispar") = .Cells(row, 1) row = row + 1 Loop End With Например в MSAccess с помощью DoCmd.TransferSpreadsheet можно сделать тоже самое за считаные секунды. |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  EUGY Вопросов: 0 Ответов: 454 |
Профиль | | #1 | Добавлено: 06.03.07 22:03 |
|
Надо, видимо, вызвать свою любимую ф-цию TransferSpreadsheet, путем подключения ссылки (References) на "MS ACCESS X.X OBJECT LIBRARY" и создания объекта DoCmd.
''' Dim upps As New Access.Application upps.DoCmd.TransferSpreadsheet...... ''' |
||
Страница: 1 |