在EXCEL中取出有交集的数据列

在EXCEL中取出有交集的数据列
Sub SQL_Excel_2010()

'On Error Resume Next '如果出bai现错误，忽略，然后执行下一行代码

Application.ScreenUpdating = False '关闭屏幕刷新,成对出现，提高速度

Application.DisplayAlerts = False '关闭提示，,成对出现，避免出现提示框

'--------------------------------------- 参数声明部分 ------------------- ------------------- -------------------

Dim cnn, SQL$ '定义数据库连接和SQL语句

Set cnn = CreateObject(“adodb.connection”) '创建数据库连接

Set rs = CreateObject(“adodb.recordset”) '创建一个数据集保存数据

'--------------------------------------- 设置数据库连接 ------------------- ------------------- -------------------

cnn.Open “Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=Excel 12.0;Data Source=” & ThisWorkbook.FullName

'--------------------------------------- 设置SQL语句 ------------------- ------------------- -------------------

SQL = “select * from [Sheet2$A:F] where x1=x3 and x1 = x5”

'--------------------------------------- SQL结果处理 ------------------- ------------------- -------------------

Set rs = cnn.Execute(SQL) '将SQL语句获得的数据传递给数据集

Range(“m2”).CopyFromRecordset rs '将数据集粘贴到Excel中，左上角为m2，无列名

cnn.Close '关闭数据库连接

Set cnn = Nothing '将CNN从内存中删除

'--------------------------------------- ------------------------ ------------------- -------------------

Application.ScreenUpdating = True

Application.DisplayAlerts = True

End Sub '这就是最简单的EXCEL中SQL的应用，其他的都是SQL的运用了

在EXCEL中取出有交集的数据列相关推荐

webbrowser控件有数据但页面空白_如何在Excel中实现可以切换不同数据系列的滚珠图?...
▲更多精彩内容,请点击上方Excel小铲子▲ 操作系统版本 Windows 10 64位 Excel版本 Microsoft Excel 2016 64位案例文档下载链接:https://pan. ...
在Excel中如何把每三行数据合并为一行？
在Excel中如何把每三行数据合并为一行? 利用PHONETIC&OFFSET函数以"吃了吗"三个字为例: 在B1中插入函数=PHONETIC(OFFSET($A$1,3 ...
Microsoft Excel 教程：如何在 Excel 中使用切片器筛选数据？
欢迎观看 Microsoft Excel 教程,小编带大家学习 Microsoft Excel 的使用技巧,了解如何在 Excel 中使用切片器筛选数据. 切片器提供可单击以筛选表或数据透视表的按钮. ...
Microsoft Excel 教程：如何在 Excel 中使用迷你图显示数据趋势？
欢迎观看 Microsoft Excel 教程,小编带大家学习 Microsoft Excel 的使用技巧,了解如何在 Excel 中使用迷你图显示数据趋势. 迷你图是工作表单元格中直观表示数据的微型 ...
计算机表格行列,excel表格中行列数据切换-在excel中如何切换图表的行/列数据
Word表格中怎样进行行列互换 excel表格如何部分行列置换 Excel中实现行列互换的具体操作知如下: 1.打开excel. 2.选中表格,然后点击[复制]. 3.选择一个空白单元格. 4.点击[ ...
厌倦了SE11/SE16N? 告诉你如何在Excel中查看SAP的表数据
SAP 提供 SE11 / SE16 / SE16N 查看表数据,SE11 首先进入的是表结构界面,然后再跳转到选择屏幕,在界面中输入选择条件运行,或直接运行,才能看到表数据.如果表设置了表维护生成器 ...
pandas使用dropna函数删除dataframe中全是缺失值的数据列（drop columns with all missing values in dataframe）
pandas使用dropna函数删除dataframe中全是缺失值的数据列(drop columns with all missing values in dataframe) 目录
pandas使用duplicated函数删除dataframe中重复列名称的数据列、默认保留重复数据列中的第一个数据列(removing duplicate columns in dataframe)
pandas使用duplicated函数删除dataframe中重复列名称的数据列.默认保留重复数据列中的第一个数据列(removing duplicate columns in dataframe) ...
pandas筛选dataframe列名称中包含特定字符串的数据列(select columns contains specifiec substring in dataframe)
pandas筛选dataframe列名称中包含特定字符串的数据列(select columns contains specifiec substring in dataframe) 目录 pandas ...

在EXCEL中取出有交集的数据列

在EXCEL中取出有交集的数据列相关推荐

最新文章

热门文章