如何使用SQL语句实现对Excel工作表数据的查询?
时间:2021-06-29 来源:互联网
如何在Excel中使用SQL语言实现数据查询?SQL语句是一种标准的数据库语言,其可以在任何关系型数据库管理系统中使用。本文介绍使用SQL语句实现对Excel工作表数据进行查询的具体方法步骤,非常实用,感兴趣的朋友一起去看看吧。
使用SQL语句对Excel工作表数据进行查询的方法:
1、启动Excel并打开工作簿,在这个工作簿中,工作表Sheet1放置商品信息记录,如图1所示;工作表Sheet2用于对商品记录进行查询,其结构如图2所示。
图1 放置商品信息记录的工作表
图2 用于商品记录查询的工作表
2、打开Visual Basic编辑器,在工程资源管理器中插入一个模块,在模块的代码窗口中输入如下程序代码:
Sub CheckData()
Dim cnn As ADODB.Connection '声明连接对象变量
Dim rs As ADODB.Recordset '声明记录集对象
Dim strSql As String
Dim str As String
On Error Resume Next
Set cnn=CreateObject(ADODB.Connection) '创建连接对象变量
Set rs=CreateObject(ADODB.Recordset) '创建记录集对象记录
cnn.Open Provider=Microsoft.Jet.OLEDB.4.0;_&Extended Properties=Excel 8.0;_&Data Source=&ThisWorkbook.FullName
str=ActiveSheet.Range(B1).Value '获取当前单元格内容
strSql=Select*FROM[Sheet1$]Where商品like '%&str&%''创建数据筛选命令
rs.Open strSql,cnn,adOpenStatic
With ActiveSheet
.Range(A4:D100).ClearContents '清除单元格记录
.Range(A4).CopyFromRecordset rs '复制筛选结果
End With
rs.Close
cnn.Close
Set rs=Nothing
Set cnn=Nothing
End Sub
3、首先在Sheet2工作表中输入需要查询的商品名称,如图3所示。运行CheckData()过程,在Sheet2工作表中将列出查询结果,如图4所示。
图3 输入商品名称
图4 获得查询结果
教程结束,以上就是关于如何使用SQL语句实现对Excel工作表数据的查询的方法步骤,需要的朋友快去试试吧!
相关教程推荐:
通过Excel生成批量SQL语句(Excel快速生成SQL更新语句)
EXCEL数据表怎么导入到SQLServer数据库中?
-
永劫无间多少钱一个红 2024-12-20
-
永劫无间多少钱开一个箱子 2024-12-20
-
阿瑞斯病毒2火铳弹药怎么获得?阿瑞斯病毒2火铳弹药获得方法 2024-12-19
-
阿瑞斯病毒2哈士奇在哪?阿瑞斯病毒2哈士奇获得方法 2024-12-19
-
寻道大千反击流阵容推荐 2024-12-19
-
和平精英性别怎么换?和平精英性别转换方法 2024-12-19