sql between的用法的意思_003 Excel SQL BETWEEN运算符用法--VBA方法

大家好,我是涂涂

今天涂涂给大家分享下Excel SQL 逻辑运算符BETWEEN的用法。

问题:

【数据源】工作表中,导出2020年2月份入职的人员信息到【结果表】工作表中。

6fa373cf3858f47f4c139bb7cd582edd.png

操作方法

通过SQL的BETWEEN运算,可以方便地查询字段值在某一范围内的数据。

步骤1

◆点击【开发工具】选项卡,点击【Visual Basic】,打开VBE编辑器

◆在VBE编辑器中,选中左侧工程管理器中的结果表,右键插入模块

◆双击新建的模块,在右侧的代码区域输入下记代码,保存,关闭VBE编辑器

547882485e7d95273069de13d22e4e0d.png

代码示例

Sub SQL_BETWEEN用法()          Dim Conn As Object          Dim Rst As Object          Dim SQL, Ver As String          Dim i As Long          Set Conn = CreateObject("ADODB.Connection")          Set Rst = CreateObject("ADODB.Recordset")         Cells.ClearContents          Ver = "provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=Excel 12.0;Data source=" & ThisWorkbook.FullName      'Excel2007以上版本          Conn.Open Ver      '    **********************************************************************************          SQL = "SELECT 工号,姓名,入职日期 FROM [数据源$] WHERE 入职日期 BETWEEN #2020-2-1# AND #2020-2-29#"      '    **********************************************************************************          Set Rst = Conn.Execute(SQL)          For i = 0 To Rst.Fields.Count - 1                  Cells(1, i + 1) = Rst.Fields(i).Name          Next i          Range("A2").CopyFromRecordset Rst      Rst.Close        Conn.Close    End Sub

步骤2

◆选中结果表工作表,点击【开发工具】选项卡,点击【插入】下拉箭头,点击【按钮】命令

◆在表格空白处,拖动鼠标画一个矩形,然后指定宏即可

98082edda81cbdd100ab4dfab470eeaa.gif

效果图:

7f937890e68a2a03d39d238ddd61ee23.png

修改查询条件:

按打开VBE编辑器,修改代码中的SQL语句

例如:导出销售额金额在10000元和20000元之间的人员名单。

SQL语句修改如下:

SELECT * FROM [数据源$] WHERE 销售额 BETWEEN 10000 AND 20000

8cdc3e62a20e1a563457435c5aa453f7.png

Tips:

◆日期两端需加上井字符号(#)

◆查找某个区间的数据,一般使用BETWEEN … AND …


等更新太累,想要了解更多,分享你的疑难杂症,

欢迎关注我的Excel微信公众号,进群一起探讨。

732088973b6199a8e3d30397f0e477d6.png

职场高效Excel

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值