Question

您好，我正在尝试创建工作表的副本，并按日期排序或过滤。我希望它在当前日期之前，但当我将其作为过滤器时，它会删除当前日期的所有数据。我真的只想看到那些具有当前日期的行。这是我到目前为止的代码。

ThisWorkbook.Sheets(1).Copy

    Range("A1:Q1").Select
    Selection.AutoFilter
    Range("C2").Select

    ActiveSheet.Range("A1:V80000").AutoFilter Field:=13, Criteria1:="<" & Date

Answer 1

更改此行

ActiveSheet.Range("A1:V80000").AutoFilter Field:=13, Criteria1:="<" & Date

要

ActiveSheet.Range("A1:V80000").AutoFilter Field:=13, Criteria1:="=" & Date

自动过滤或按日期排序

1 个答案: