如何使用SQL语句实现对Excel工作表数据的查询? |
您所在的位置:网站首页 › 电脑电源开机后自动断电 › 如何使用SQL语句实现对Excel工作表数据的查询? |
如何在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工作表数据的查询的方法步骤,需要的朋友快去试试吧! 相关教程推荐: |
今日新闻 |
推荐新闻 |
CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3 |