使用vba对excel范围进行数据筛选不起作用。开发者社区

link之家

链接快照平台

输入网页链接，自动生成快照
标签化管理网页链接

相关文章推荐

挂过科的香菜 · Enumerate BLE devices ...· 1 年前 ·

任性的便当 · libcurl get post ...· 2 年前 ·

长情的自行车 · future.get方法阻塞问题的解决，实现 ...· 2 年前 ·

卖萌的米饭 · k8s 问题 - 会飞の鱼 - 博客园· 2 年前 ·

腾讯云

开发者社区

文档意见反馈控制台

首页 TVP

文章/答案/技术大牛

发布

startDT = ActiveSheet.txtStartDT.Text   '01-Jul-2021
endDT = ActiveSheet.txtEndDT.Text    '31-Jul-2021
For Each srcWsht In srcWbk.Worksheets
            lastSrcRow = srcWsht.Range("A1").End(xlDown).Row
            srcWsht.Range("A2:A" & lastSrcRow).Replace What:="'", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
            srcWsht.Range("A2:A" & lastSrcRow).NumberFormat = "dd-MM-yyyy"
            srcWsht.Range("A1:O" & lastSrcRow).AutoFilter Field:=1, Criteria1:=">=" & CDate(startDT), Operator:=xlAnd, Criteria2:="<=" & CDate(endDT), visibledropdown:=True

推荐文章

挂过科的香菜 · Enumerate BLE devices with a given service GUID - Microsoft Q&A

1 年前

任性的便当 · libcurl get post http-阿里云开发者社区

2 年前

长情的自行车 · future.get方法阻塞问题的解决，实现按照任务完成的先后顺序获取任务的结果_傅里叶、的博客-CSDN博客

2 年前

卖萌的米饭 · k8s 问题 - 会飞の鱼 - 博客园

2 年前