使用Excel VBA连接SQL Server数据库并将表中的数据显示到Excel中

最新推荐文章于 2025-09-26 08:58:57 发布

XisVisual_Basic

最新推荐文章于 2025-09-26 08:58:57 发布

阅读量2k

点赞数

CC 4.0 BY-SA版权

文章标签：数据库 excel C#

本文链接：https://blog.youkuaiyun.com/XisVisual_Basic/article/details/133306695

C# 专栏收录该内容

139 篇文章 ¥59.90 ¥99.00

订阅专栏

本文介绍了如何使用Excel VBA连接到SQL Server数据库，并展示如何通过VBA将数据库表数据导入Excel工作表。详细步骤包括启用VBA编辑器、添加ADO库引用、编写VBA代码以及运行宏来实现数据的显示。

在Excel中使用VBA编程语言，我们可以轻松地连接到SQL Server数据库，并将数据库表中的数据显示在Excel工作表中。以下是详细的步骤和源代码示例。

步骤1：启用VBA编辑器
要开始编写VBA代码，首先需要启用VBA编辑器。在Excel中，按下Alt + F11键打开VBA编辑器。

步骤2：添加对ADO库的引用
在VBA编辑器中，选择“工具”菜单，然后选择“引用”。在出现的对话框中，找到并选中“Microsoft ActiveX Data Objects x.x Library”（其中x.x是版本号），然后点击“确定”按钮。

步骤3：编写VBA代码
在VBA编辑器中的代码窗口中，编写以下代码：

Sub ConnectToSQLServer()
    ' 声明变量
    Dim conn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    Dim connStr As String
    Dim strSQL As String
    Dim serverName As String
    Dim dbName As String
    Dim tableName As String
    
    ' 设置数据库连接字符串
    serverName = "数据库服务器名称" ' 替换为实际的数据库服务器名称
    dbName = "数据库名称" ' 替换为实际的数据库名称
    tableName = "表名称" ' 替换为实际的表名称
    connStr = "Provider

了解本专栏