范围(" A1:BC1")。选择Selection.AutoFilter Field:=" 48",Criteria1:=">今天()-1" _,运算符:= xlAnd

时间:2017-08-26 06:01:14

标签: vba excel-vba excel

如何找到大于今天的日期范围

Range("A1:BC1").Select
Selection.AutoFilter Field:="48", Criteria1:="> today ()-1" _
    , Operator:=xlAnd

1 个答案:

答案 0 :(得分:2)

使用日期的ivory_ck_editor: default_config: default configs: default: filebrowserBrowseRoute: elfinder filebrowserBrowseRouteParameters: [] 使用日期时更安全的方式是将日期转换为AutoFilter。这样它就不会依赖于单元格的格式,使用Double的{​​{1}}。

此外,您的Criteria范围仅包含1行?

我在下面的示例中使用随机数1000.您应该在此范围内查找LastRow,并让">" & CDbl(Date)范围动态。

AutoFilter

注意:无需使用AutoFilter后跟Range("A1:BC1000").AutoFilter Field:=48, Criteria1:=">" & CDbl(Date) ,您可以直接Select范围。