VBA日期区间过滤异常：Excel显示筛选值正确但无数据返回

问题核心是你拼接的日期字符串格式和Excel内部识别逻辑不匹配——虽然筛选器显示的文本正确，但Excel后台没正确解析条件，导致筛选不生效，手动确认相当于触发了Excel重新解析条件。

以下是两种可靠的解决方法：

方法1：使用Excel日期序列号（推荐） #

Excel内部用数字序列号存储日期，直接传递序列号能彻底避免格式歧义：

ActiveSheet.Range("A1:AG1").AutoFilter Field:=10, _
    Criteria1:=">=" & CLng(periodStart), _
    Operator:=xlAnd, _
    Criteria2:="<=" & CLng(periodEnd)

CLng(periodStart)会把日期变量转换成对应的Excel日期序列号，让筛选逻辑直接生效。

方法2：使用通用日期格式 #

用yyyy-mm-dd格式拼接日期字符串，这是Excel不受区域设置影响的通用识别格式：

ActiveSheet.Range("A1:AG1").AutoFilter Field:=10, _
    Criteria1:=">=" & Format(periodStart, "yyyy-mm-dd"), _
    Operator:=xlAnd, _
    Criteria2:="<=" & Format(periodEnd, "yyyy-mm-dd")

额外排查点 #

如果目标数据列的日期是文本格式，先把数据列转换成日期格式再筛选：

' 转换第10列为日期格式
ActiveSheet.Columns(10).NumberFormat = "yyyy-mm-dd"
ActiveSheet.Columns(10).Value = ActiveSheet.Columns(10).Value

内容的提问来源于stack exchange，提问作者Xavier