连接到 SQL 服务器在 VBA Excel 中

通过直接连接到 ERP 数据库建设在 Excel 中自动生成的报表是条不错的捷径有新鲜和准确的信息,基于你的决定。 此方法方便了数据处理和操纵的 VBA 之前显示的结果和结论和进一步可用性的组织,计算和排序后 Excel 表进行填充。

连接到 SQL 服务器

要连接到数据库服务器必须切换到代码写作和项目资源管理器 (左侧或访问视图菜单,如果它不可见) 中选择 ThisWorkbook 并在这里添加下面的代码︰

作为一个新的连接的公共骗局。连接

私营子 Workbook_Open()

昏暗的 r 作为一个新的连接。记录集
Con.ConnectionString ="驱动程序 = {SQL Server};服务器 = SQLServerName; uid = 用户名; pwd = 密码"
Con.Open
Con.CommandTimeout = 20
Con.Execute"表"

结束子

你还得去工具 / 首选项… 要在 Microsoft ActiveX 数据对象 2.5 库按顺序检查为此类型的连接对象以可用。

连接工作只有在你保存并重新打开 Excel 文件,打开该文件时,只作连接之后。

连接到 SQLServer VBA

使用与数据库的连接

"R"变量作为 ADODB。记录集可用于在此之后的任何过程或函数查询数据库的表和过程的产出。 别忘了该变量定义为 ADODB。中的每个宏的记录集。

如果在连接中断任何理由,Excel 文件是应关闭并重新打开来重置它的。 包含 VBA 宏的 Excel 文件必须保存扩展名.xlsm 或.xls,为.xlsx 不保存 Excel 电子表格后面的 VBA 代码。

 

Write a Reply or Comment

Your email address will not be published.

此站点使用Akismet来减少垃圾评论。了解我们如何处理您的评论数据