在EXCEL中查询SQL数据库

你的查询语句可以在Excel里面实现，不过是要通过加一些VBA代码到Excel宏语句里面，下面是我做过的一个Excel查询Access数据库程序，希望对你有所帮助

*在Excel里面建立数据链接

Private Sub GetFirstQuery()

ThisWorkbook.Activate

Sheets("Data").Activate

Cells.Delete

Set C = ActiveSheet.QueryTables.Add(Connection:="ODBCDSN=MS Access DatabaseDBQ=" &ThisWorkbook.Path &"\test.mdbDefaultDir=", Destination:=Range("A1"))

With C

.CommandText = Array("SELECT * FROM A Where ID <=1")

.Refresh BackgroundQuery:=False

End With

End Sub

根据参数进行查询

Private Sub GetData(Para1 As String, Para2 As String, Para3 As String)

Dim WhereText As String

ThisWorkbook.Sheets("Data").Activate

WhereText = IIf(Para1 <>"", " segment='" &Para1 &"' ", "")

WhereText = WhereText &IIf(Para2 <>"" And WhereText <>"", " And ", "") &IIf(Para2 <>"", " Channel='" &Para2 &"' ", "")

WhereText = WhereText &IIf(Para3 <>"" And WhereText <>"", " And ", "") &IIf(Para3 <>"", " Demo='" &Para3 &"' ", "")

With C

.CommandText = Array("SELECT * FROM A Where " &WhereText)

Debug.Print .CommandText

.Refresh BackgroundQuery:=False

End With

End Sub

实施查询的程序

Sub Test()

Call GetFirstQuery

Call GetData("18", "Mike", "2006")

End Sub

步骤1：点击开始，打开Microsoft Excel 2010。

2

步骤2：打开之后，点击数据，其他来源，来自SQL Server。

3

步骤3：打开数据链接向导之后，输入服务器名称和登陆用户名和密码。点击下一步。

步骤4：点击下一步之后，报错，不能够正常链接数据库。

步骤5：打开SQL Server 数据库代理服务器，查看代理停止工作，将其启动。

步骤6：修改服务器名称为SQL Server所在的服务器的IP地址填写入服务器名称，登陆名称和密码全部为sa。

步骤7：进入，选择数据库和表。选择PUBS，点击下一步。

步骤8：点击下一步，保持链接文件，点击完成。

步骤9：点击导入数据

步骤10

连接属性，连接名称：172.16.0.31

pubs employee，连接文件：C:\Documents and Settings\lys\My

Documents\我的数据源\172.16.0.31 pubs employee.odc 连接字符串：

Provider=SQLOLEDB.1Persist Security Info=TrueUser ID=saData

Source=172.16.0.31Use Procedure for Prepare=1Auto

Translate=TruePacket Size=4096Workstation ID=L10-1DA235E90Use

Encryption for Data=FalseTag with column collation when

possible=FalseInitial Catalog=pubs 命令文本："pubs"."dbo"."employee"

步骤11：点击确定，输入密码Sa。

步骤12： 我们可以看到将SQL Server数据写入了EXCEL中。

查询EXCEL中数据库：

查询数据库中数据：

SELECT *

FROM employee

vb能直接 *** 作文件,vbs不能

vb能调用API,vbs不能

VB能定义结构体数据,vbs不能

VB能创建界面[窗体],vbs不能

vb需要编译,vbs不需要

其余的基本一样,除个别函数以外.

vbs脚本应用广泛,word、excel、asp、html还有系统配置都用到它.

vb入门相当简单，开发视窗程序，数据库等应用型程序快捷，方便。

---