Импорт онлайн-данных xls в доступ MS через VBA

Мне нужно импортировать данные обменного курса, хранящиеся в электронной таблице Excel, в онлайн-таблицу данных Access. Однако сначала мне нужно манипулировать им, поэтому я хотел бы импортировать его в массив, а затем записать массив в таблицу. Код, который я использовал для Excel, похоже, не работает с Access...

Dim arr as variant
Workbook.Open ("http://www.rba.gov.au/statistics/tables/xls-hist/f11hist.xls")
arr=activeworkbook.worksheets("Data").Range("A12:X" & Range("A1045876").end(xldown).Row)

'data manipulation ommitted

'add to data table

Ясно, что это не работает в Access, но я понятия не имею, как открыть файл и прочитать данные. Любая помощь приветствуется!


vba ms-access data-import
person user3725021    schedule 09.06.2015    source источник

Ответы (3)


arrow_upward
0
arrow_downward

Ваш вопрос слишком широк, поэтому ответ общий. Вы можете использовать библиотеку объектов Microsoft Excel в приложении MS Access, добавив ссылку на эту библиотеку и начав использовать ее методы, аналогично тому, что вы сделали в Excel. Дополнительные сведения см. по адресу: https://msdn.microsoft.com/en-us/library/office/ff194944.aspx. Надеюсь, это может помочь.

person Alexander Bell    schedule 09.06.2015

arrow_upward
0
arrow_downward

Я думаю, что эта линия может помочь вам. Docmd.Transferspreadsheet acImport,,"имя таблицы excel","ссылка для поиска таблицы (ex:c:.....)",true, которая поможет взять таблицу excel и импортировать его на доступе.

person Gatamike    schedule 09.06.2015

arrow_upward
0
arrow_downward

Excel делает это за кулисами, сначала загружая файл, а затем читая его.

Access не может этого сделать, но вы можете использовать VBA для загрузки файла Загрузить файл с URL-адреса, а затем создать ссылку на рабочий лист или именованный диапазон в нем. Или откройте файл с помощью автоматизации.

person Gustav    schedule 09.06.2015