通過VBA將xls數據導入MS訪問

Question

我需要將存儲在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 

顯然，這不訪問工作，但我有不知道如何打開該文件，並讀取數據。任何幫助感謝！

Answer 1

你的問題過於寬泛，所以答案是通用的。您可以在MS Access應用程序中使用Microsoft Excel對象庫，方法是添加對該庫的引用並開始使用其方法，這與您在Excel中完成的操作類似。更多細節在：https://msdn.microsoft.com/en-us/library/office/ff194944.aspx。希望這可能有所幫助。

Answer 2

我想這條線可以幫助你。 Docmd.Transferspreadsheet acImport ,,「excel表的名稱」，「查找表的鏈接（例如：c：.....）」，true 這將有助於獲取excel表並導入其訪問權限。

Answer 3

Excel是通過 - 幕後操作 - 首先下載文件然後讀取它。

訪問不能執行此操作，但可以使用VBA下載文件Download file from URL，然後創建一個指向其中的工作表或命名範圍的鏈接。或通過自動化打開文件。