我想從Excel中導出表格到Access數據庫中的表格,但我不斷收到錯誤「數據庫或對象是隻讀的」。這是qestion中的代碼。從Excel導出到訪問錯誤
dbWB = Application.ActiveWorkbook.FullName
dbWS = Application.ActiveSheet.Name
dsh = "[" & dbWS & "$]"
Set DB = CreateObject("ADODB.Connection")
dbPath = "\\Corpaa.aa.com\CampusHome\IOCADHome02\758673\Projects\Global Analysis Tool\MX Analysis DB\Global Line MX Hub Review DB.accdb"
scn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & dbPath
DB.Open scn
DB.Execute "DELETE * FROM tblNewSchedule;"
SQLInsert = "INSERT INTO tblNewSchedule "
SQLSelect = "SELECT * "
SQLFrom = "FROM [Excel 8.0; HDR=YES; DATABASE= " & dbWB & "]." & dsh & " "
strQry = SQLInsert & SQLSelect & SQLFrom & ";"
DB.Execute strQry
DB.Close
的DELETE
QRY只執行沒有錯誤的罰款。問題是執行strQry
。我相信世界銀行是隻讀的,但我正在運行WB的代碼。我正在運行Office 2010.感謝您的幫助。
如果你的'SQLFrom = ...'行不結束'&dbWS&「」'?你使用過我看不到的'dsh'嗎? – CLR
對不起,我意外地刪除了該行。我用'dsh'行編輯了代碼。 –
你在'Execute'之前嘗試過'Debug.Print strQry'來檢查任何明顯的東西嗎? – CLR