求大佬解决 Excel 2019 错误1004 类range的autofilter方法无效

win10 用office2019 录制完宏，再次执行宏就报错了。我已试过 1 清楚筛选状态，2 将宏的安全性设置为启用宏，以及 3 允许对象模型的访问这些方法，还是同样出现错误，代码为
Sub 宏2()
'' 宏2 宏''
Columns("A:A").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$A$18928").AutoFilter Field:=1, Operator:= _
xlFilterValues, Criteria2:=Array(2, "1/1/2016")
End Sub