我在利用VB编程想把Excel表中的数据导入到Access数据库中，程序是照书上的，但是提示“要求对象”？

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.Open "provider=microsoft.jet.OLEDB.4.0;data source=" & App.Path & "\yuanziguangpushujuku.mdb;persist security info=false"
conn.Execute "select * into tmptable from[excel 8.0;database=" & cechushuju1.xls & "].[sheet1]"
conn.Execute "insert into yuanziguangpushujubiao(姓名,籍贯,性别,学历,面貌) select 姓名,籍贯,性别,学历,面貌 from tmptable"
conn.Execute "drop tabel tmptable"
Set conn = Nothing

急用，能快点帮我解决一下吗？

---

要用两个连接 一个连接excel 一个连access，把从excel查处的数据放到dataset里，循环dataset的记录，用另一个连接插入到access中。
********************************************************************************************************************
抱歉，没仔细看代码，你腊岁橡可能需要确认一下执行到conn.Open 时，conn的状态有打开,然后再执行到conn.Execute "select * into tmptable ....时确认一下ACESS中有生成tmptable 这个表，如果没有，雀腔那么再看看你传轮旁进去的路径是否正确，路径上确实存在excel和access文件，确定SQL写的空格字符什么的。

---

Sub LoadUsers() On Error Resume Next Screen.MousePointer = 11 Dim

---