体验零代码搭建

如何使用SQL语句实现对Excel工作表数据的查询?

网友投稿  ·  2024-02-11 12:02  ·  云表格  ·  阅读 446


SQL语句可以在任何关系型数据库管理系统中使用,那么,如何使用SQL语句实现对Excel工作表数据的查询呢?今天脚本之家小编就给大家介绍用SQL语句查询Excel数据的方法,希望大家看完有所收获

SQL语句可以在任何关系型数据库管理系统中使用,那么,如何使用SQL语句实现对Excel工作表数据的查询呢?今天脚本之家小编就给大家介绍用SQL语句查询Excel数据的方法,希望大家看完有所收获

如何在Excel中使用SQL语言实现数据查询?SQL语句是一种标准的数据库语言,其可以在任何关系型数据库管理系统中使用。本文介绍使用SQL语句实现对Excel工作表数据进行查询的具体方法步骤,非常实用,感兴趣的朋友一起去看看吧。

如何使用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工作表数据的查询的方法步骤,需要的朋友快去试试吧!

相关教程推荐:


Excel2013中怎么按照周次和星期自动计算并填入日期? << 上一篇
2024-02-11 12:02
在Excel中使用SQL语句进行数据筛选的方法介绍
2024-02-11 12:02
下一篇 >>

相关推荐