Question

EXCEL 宏指令 运行时错误438，对象不支持该属性或方法

ActiveSheet.Range("A:D").AutoFilter Field:=3, Operator:= _

xlFilterValues, Criteria1:=">=" & Format(Sheets("Sheet1").Range("E4") & "/1/2014", "M/D/YYYY") _
, Operator:=xlAnd, Criteria2:="<=" & Format(Application.WorksheetFunction. _
EoMonth(Sheets("Sheet1").Range("E4") & "/1/2014", 0) + 1, "M/D/YYYY")

我这个宏指令是 用来按单元格的内容筛选某月份的所有数据。
但是运行时出现：
运行时错误438，对象不支持该属性或方法
我在 office 07版本运行没有问题，但是在office 03版本运行就出现这个问题。

Answer 1

这变量好长……
为什么不把Sheets("Sheet1").Range("E4")这一串先赋值给一个变量再放到筛选里面呢

这样好长一坨

Answer 2

 54541

Answer 3

一看就是录制的宏，你在03下再录制个看看哪里不同就知道了。代码上看没有问题的。

Answer 4

03版和07版本的vba有写句子是不一样的。

Answer 5

不要用03版，很多东西不兼容。
如果必须使用，你可以在03版环境下录制宏来修改。