从Excel宏连接到Access数据库时出错

时间:2013-11-12 11:28:43

标签: excel vba excel-vba ms-access-2010

我必须创建excel宏,它从访问数据库中获取并更新excel工作表中的相应列。 我以前从未做过VBA编程,我只能编写一个代码来连接数据库,这会给我一个错误,说“在From子句中出错”。

Sub Button2_Click()
Dim conn As New Connection
Dim rs As New Recordset

strcon = "Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=C:\Users\Xprts8\Documents\shipping.accdb;" & _
"User Id=admin;Password="

conn.Open (strcon)

qry = "SELECT * FROM shipping-table"
rs.Open qry, conn, adOpenKeyset

rs.Close
conn.Close

End Sub

任何人都可以帮我解决以下问题

1 个答案:

答案 0 :(得分:1)

shipping-table不是SQL语句中的有效表名(因为连字符),除非它因此被转义:

SELECT * FROM [shipping-table]