尝试获取日期过滤的AutoFilter条件时出现错误1004

Question

我正在处理一段VBA代码,它应该在Excel中保存和恢复当前的AutoFilter状态.我一直在使用这里的代码没有任何问题,但现在我遇到了一个非常严重的问题.让我说明......

假设您有一个(非常简单的)表设置日期过滤:

如果您希望以编程方式使用过滤条件,则会失败:

这在Excel 2010中正在发生.有谁知道解决方法吗？

Microsoft TechNet上其他人描述的同一问题的链接:当运算符为日期的xlFilterValues时,Excel VBA AutoFilter条件这指向Jon von der Heyden的网站以获得解决方案,但该网站提到:

未知(可能是日期TreeView过滤器):到目前为止,我无法找到捕获日期过滤器的方法,其中条件基于"过滤器"下拉列表中"树视图"控件的选择.这些条件不存储在Criteria1或Criteria2属性中.我想,制定标准将涉及循环Range_Field值.虽然这首先要求关闭所有其他字段过滤器,但是工作表函数无法执行某些操作,并且会涉及触发子例程的计时器.我再次选择避免额外的复杂性.

Answer 1

似乎是一个错误，但仅在使用过滤器选择器底部的树视图时才会发生。

如果您使用“datefilters”选项并选择一个过滤器，那么它将正常工作。