Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 3558|回复: 3

[已解决]sql跨工作薄查询

[复制链接]
发表于 2014-7-7 17:45 | 显示全部楼层 |阅读模式
在VBA用sql语句进行跨工作薄查询,我不知道该怎么写

sql跨工作薄查询.rar

18.13 KB, 下载次数: 11

发表于 2014-7-7 18:27 | 显示全部楼层    本楼为最佳答案   
1

sql跨工作薄查询.zip

23.6 KB, 下载次数: 40

回复

使用道具 举报

 楼主| 发表于 2014-7-7 19:11 | 显示全部楼层
xdragon 发表于 2014-7-7 18:27
1

谢谢了 就是有点看不懂啊 我特业余的 ,能帮我看看这句有什么问题吗?提示至少有一个参数未被制定值,我试了试好像是没有字段名
Sql1 = "select a.支出项目编号 from [Excel 8.0;IMEX=1;Database=" & ThisWorkbook.Path & "\财务结算单台账.xls" & ";HDR=no].[sheet1$A3:AX5000] as a"

参数未指定.rar

215.29 KB, 下载次数: 9

回复

使用道具 举报

发表于 2014-7-7 20:17 | 显示全部楼层
  1.   conn.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & ThisWorkbook.Path & "\数据源.xls"
复制代码
在这个代码处写链接数据库的名称。

另外在你给我的表格里并没有看到(支出项目编号)字段,所以才显示没有字段名。
  1.     Sql1 = "select * from [sheet1$A3:AX5000] as a"
复制代码
改成这个可以运行
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-14 09:40 , Processed in 0.222708 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表