利用Excel功能实现MSSQL数据链接

随着互联网的发展，信息的活动更加的自若方便。很多公司或机构都有各种各样的数据库，怎么让这些数据库能有效地无缝连接已成为一项重要的技术，特别是对数据分析师来说，能够从区别渠道获得数据更有益于快速准确的数据分析。本篇教程将展现如何利用Excel的功能实现MSSQL数据的链接读取操作。

首先，确保Excel软件安装了Microsoft ODBC for Oracle驱动器，此驱动器可以与MSSQL数据库建立连接。然后，新建一个Excel表格，打开数据选项，点击获得外部数据，以选择查询方式。

接下来，点击“文件类型”下拉框，可以看到有“Microsoft SQL Server”选项。选中这一项，点击肯定，出现相应的ODBC连接页。这里需要填写服务器和数据库的名称，同时填写登陆信息包括登陆名和密码，完成信息的填写后点击“肯定”完成对MSSQL的链接。

最后，点击“查询”，再点击“编辑查询”可以看到查询面板，这里可以输入SQL语句，一旦输入终了，点击“肯定”，就能够看到MSSQL中的数据被读取到Excel表中了。这里可以对数据进行分析，数据的排序，也能够进行图表的绘制等。

因而可知，我们可以很方便地利用Excel的功能实现MSSQL数据的链接读取操作，使数据可视化，也能够分析得出更加科学的结论。

下面是一段相关的代码：

Sub ConnectToDatabase（）

‘建立ODBC连接

Dim myconn As ADODB.Connection

Set myconn = New ADODB.Connection

myconn.Open “DRIVER ={ Microsoft ODBC for Oracle}; ” & “SERVER = YOUR_SERVER; DATABASE = YOUR_DATABASE; ” & “UID = YOUR_UID; PWD = YOUR_PASSWORD;”

‘获得数据

Dim myrs As ADODB.Recordset

Set myrs = New ADODB.Recordset

myrs.Open “SELECT * FROM UsersTable”, myconn, adOpenDynamic

‘ 将数据拷贝到活开工作表

ActiveSheet.Range(“A1”).CopyFromRecordset myrs

myrs.Close

myconn.Close

End Sub

本文来源：https://www.yuntue.com/post/225741.html | 云服务器网，转载请注明出处！