Question

excel vba sql语句excel工作簿导入到access数据库

下面这段sql是什么意思，怎么修改成其他未打开工作簿a中sheet1表格中某几个字段导入到access数据库
"insert into 通讯录 select * from [Excel 8.0;Database=" & ThisWorkbook.FullName & "].[" & sheet1 & "$" & [a1].CurrentRegion.Address(0, 0) & "]"
cnn.Execute SQL

Answer 1

select * 那里把*换成你想导入的列名就行了。
例如
select 产品,型号,价格
注意列名之间用英文逗号分隔。

追问

还是不行

能帮我编写一个代码吗，代码不是在图2表里，在另外一个excel表格，excel版本是2016和2003

追答

insert into 通讯录 select 商品编码,商品名,商品简称,颜色及编码 from

就这样啊，其它的不变，select和from之间的写成这样就行了。不写代码也完全能完成这功能。

Answer 2

这个意思是查询打开的工作簿的sheet1的A1那个单元格的数据插入到通讯录表中。

Answer 3

大致是这样：
Set Acnn=CreateObject(“ADODB.Connection”)
Set Rst=CreateObject(“ADODB.Recordset”)
SQL=“insert into “ & 订单 & “ select * from [Excel 12.0;Database=“ & MyPath &”].[订单$” Range(“A2:H1000”)
Acnn.Execute SQL

Answer 4

excel导access帮写 搞定了没有