400-685-0732

WJMonitor舆情之声

企业大数据智能舆情监测管理解决方案

全网监测海量数据按需发布监测预警

实时把握舆情动态精准追溯信息源头

获取验证码
企业采购 个人使用
当前位置: 首页 > 办公 > excel > excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法

excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法

时间:2018-07-13 15:41:52

excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法,这个问题是我们很多人都很困惑的一个问题,excel sql语句筛选重复数据是我们非常常用的一个东西,也是我们工作和学习中必不可少的一个数据公式,那么具体我们要怎么做呢?下面就来看看这篇excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法的文章吧!

在使用VBA对数据库进行访问时,利用SQL语句能够方便地实现对数据库的查询。本文使用SQL语句实现多条件查询,使用Select语句从“成绩管理.accdb”数据库文件中获取1班中数学和语文成绩均大于98分的学生记录,记录使用For...Next结构写入工作表的单元格。本文图文介绍使用SQL语句进行数据筛选的具体操作方法。

1、启动Excel并打开工作表,打开Visual Basic编辑器,在工程资源管理器中插入一个模块,在模块的“代码”窗口中输入如下程序代码:

Public Sub数据筛选()

Dim mydata As String,mytable As String,SQL As String '声明变量

Dim cn As ADODB.Connection '声明连接对象变量

Dim rs As ADODB.Recordset '声明记录集对象

Dim i As Integer '声明计数变量

ActiveSheet.Cells.Clear '清空单元格

mydata=ThisWorkbook.Path&"\成绩管理.accdb" '指定数据库文件

mytable="成绩表" '指定工作表

Set cn=New ADODB.Connection '创建连接对象变量

With cn

.Provider="microsoft.ace.oledb.12.0" '指明OLEDB提供者

.Open mydata '打开数据库

End With

SQL="select*from"&mytable_&"where(班级= '1')and(数学>=98 or语文>=98)"'创建数据筛选命令

Set rs=New ADODB.Recordset '创建记录集对象记录

rs.Open SQL,cn,adOpenKeyset,adLockOptimistic '复制字段名

For i=1 To rs.Fields.Count

Cells(1,i)=rs.Fields(i-1).Name '将字段名写入单元格

Next i

Range("A2").CopyFromRecordset rs '复制数据

rs.Close '关闭记录集对象

cnn.Close '关闭连接对象

Set rs=Nothing '删除记录集对象变量

Set cn=Nothing '删除连接对象变量

End Sub

2、按F5键运行该程序,“成绩管理”数据库中“班级”为“1”,“语文”和“数学”成绩均大于98分的数据被筛选到工作表中,如图1所示。

excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法

图1 数据筛选结果

以上就是excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法全部内容了,希望大家看完有所启发,对自己的工作生活有所帮助,想要了解更多跟excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法请关注我们优词网!

excel sql语句筛选重复数据 使用SQL语句进行数据筛选的方法

分享按钮