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

相关文章推荐

傲视众生的葡萄 · VBA动态数组简单应用_vba ...· 2 周前 ·

深情的炒粉 · (VBA) 使用数组 | ...· 2 周前 ·

仗义的苹果 · vba如何将数组添加到下拉列表中，数组中的某 ...· 2 周前 ·

痛苦的菠萝 · ExcelVba基本操作，执行重复的复制粘贴 ...· 2 周前 ·

烦恼的八宝粥 · 如何在Excel中用VBA复制整行并粘贴多行 ...· 2 周前 ·

爱玩的金鱼 · Node.js躬行记（14）——压力测试 ...· 1 年前 ·

玩足球的酱牛肉 · 我的直播回放来啦！-腾讯云开发者社区-腾讯云· 1 年前 ·

玩足球的烤土司 · c# - Click Event for ...· 1 年前 ·

正直的豆芽 · 无法加载文件或程序集"Oracle.Data ...· 1 年前 ·

狂野的野马 · Python免杀过360 - 馒头/ - 博客园· 1 年前 ·

腾讯云

开发者社区

文档意见反馈控制台

首页 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

推荐文章

傲视众生的葡萄 · VBA动态数组简单应用_vba 动态数组用法-CSDN博客

2 周前

深情的炒粉 · (VBA) 使用数组 | Microsoft Learn

2 周前

仗义的苹果 · vba如何将数组添加到下拉列表中，数组中的某些元素带有逗号，要求不影响原数组的值 - CSDN文库

2 周前

痛苦的菠萝 · ExcelVba基本操作，执行重复的复制粘贴_vba循环复制粘贴指定区域-CSDN博客

2 周前

烦恼的八宝粥 · 如何在Excel中用VBA复制整行并粘贴多行？ - CSDN文库

2 周前

爱玩的金鱼 · Node.js躬行记（14）——压力测试 - 咖啡机（K.F.J） - 博客园

1 年前

玩足球的酱牛肉 · 我的直播回放来啦！-腾讯云开发者社区-腾讯云

1 年前

玩足球的烤土司 · c# - Click Event for WPF Image - Stack Overflow

1 年前

正直的豆芽 · 无法加载文件或程序集"Oracle.DataAccess“或其依赖项之一 - 问答 - 腾讯云开发者社区-腾讯云

1 年前

狂野的野马 · Python免杀过360 - 馒头/ - 博客园

1 年前