以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  日期不规则时,如何按日期筛选数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=119735)

--  作者:wtfwsk05
--  发布时间:2018/5/30 23:52:00
--  日期不规则时,如何按日期筛选数据

图片点击可在新窗口打开查看此主题相关图片如下:日期1.jpg
图片点击可在新窗口打开查看   如上图所示,日期列属于非标准列时,如何做按日期筛选数据
  

--  作者:有点甜
--  发布时间:2018/5/31 9:01:00
--  

直接筛选就可以了,如

 

Tables("af").Filter = "创建日期 >= \'2018.02.10\' and 创建日期 <= \'2018.05.11\'"


--  作者:wtfwsk05
--  发布时间:2018/5/31 12:03:00
--  
Dim startdate As Date = RibbonTabs("测试").Groups("筛选").Items("工具栏1").Items("starDate").value
Dim enddate As Date = RibbonTabs("测试").Groups("筛选").Items("工具栏2").Items("endDate").value
Tables("af").Filter = "创建日期 >= \'" & startdate & "\' And 创建日期 <= \'" & Enddate & "\'"

在操作界面录入2018-01-01  2018-05-31  后点击筛选按钮没有反映

--  作者:有点甜
--  发布时间:2018/5/31 12:18:00
--  
Dim startdate As Date = RibbonTabs("测试").Groups("筛选").Items("工具栏1").Items("starDate").value
Dim enddate As Date = RibbonTabs("测试").Groups("筛选").Items("工具栏2").Items("endDate").value
Tables("af").Filter = "创建日期 >= \'" & format(startdate, "yyyy.MM.dd") & "\' And 创建日期 <= \'" & format(Enddate, "yyyy.MM.dd") & "\'"