excel VBA -我无法看到自动筛选的结果(如未应用/按下确定按钮)

n3h0vuf2  于 2023-01-27  发布在  其他
关注(0)|答案(1)|浏览(198)

我正在使用下面的代码过滤范围2日期。我看到过滤器设置正确的过滤器参数,但只有当我按下确定按钮,我可以看到我的表过滤结果..有人知道为什么吗?

Sub Pofiltrujodnajnowszejdaty()

Set First_Cell = Worksheets("Schedule RA_RB").Range("B2")
Set Starting_Date = Range("J1")
Set Ending_Date = Range("K1")
Field = 2

First_Cell.AutoFilter Field:=Field, Criteria1:=">" & Starting_Date, Operator:=xlAnd, Criteria2:="<=" & Ending_Date

End Sub
mwkjh3gx

mwkjh3gx1#

您必须传递日期的数值-如果您不是在英语系统上工作,则始终是这种情况:

First_Cell.AutoFilter Field:=Field, Criteria1:=">" & CLng(Starting_Date), Operator:=xlAnd, Criteria2:="<=" & CLng(Ending_Date)

相关问题