以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [原创]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=57886)

--  作者:云鑫物流
--  发布时间:2014/10/7 9:53:00
--  [原创]
是一个表中   指定某列筛选等于系统当前日期     有一列带时间   有2列没有带时间
--  作者:有点甜
--  发布时间:2014/10/7 9:54:00
--  

 Tables("表A").Filter = "第一列 >= #" & Date.Today & "# and 第一列 < #" & Date.Today.AddDays(1) & "#"


--  作者:云鑫物流
--  发布时间:2014/10/7 10:24:00
--  
OK谢谢
--  作者:云鑫物流
--  发布时间:2014/10/7 20:40:00
--  
你好怎么出错了,提示该字符串未被识别为有效的 DateTime。有一个从索引 10 处开始的未知字。
--  作者:有点甜
--  发布时间:2014/10/7 20:44:00
--  

 那你就尝试这样改

 

 Tables("表A").Filter = "第一列 >= #" & Format(Date.Today, "yyyy-MM-dd") & "# and 第一列 < #" & Format(Date.Today.AddDays(1), "yyyy-MM-dd") & "#"