VBA连接SQL Server

bigheadsheep

于 2013-07-25 09:59:37 发布

阅读量2.3k

点赞数

CC 4.0 BY-SA版权

分类专栏： VBA宏

版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文链接：https://blog.youkuaiyun.com/bigheadsheep/article/details/9464619

这篇博客介绍了如何在VBA中与SQL Server建立连接，通过设置连接字符串，执行SQL查询并将结果填充到Excel单元格中。示例代码展示了查询表table1的所有数据，并在完成操作后关闭连接和释放资源。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

在VBA中直接与SQL服务器建立连接

Set Conn = CreateObject("adodb.connection")

'定义连接的SERVER名，数据库名，用户名和密码

Conn.Open "Driver=SQL Server;SERVER=DB001;Database=DBtest;uid=userID;pwd=password"

'判断连接状态

If Conn.State = 1 Then

'定义SQL文

sqll = "SELECT * FROM table1"

'将结果显示到a2单元格

[a2].CopyFromRecordset Conn.Execute(sqll)

&n

最低0.47元/天解锁文章

200万优质内容无限畅学

评论

被折叠的条评论为什么被折叠?

到【灌水乐园】发言

查看更多评论

添加红包

成就一亿技术人!

hope_wisdom

发出的红包

实付元

使用余额支付

点击重新获取

扫码支付

钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。