excel - 过滤以仅显示在单元格中输入的日期之后的数据

Question

我有一个数据集，我只想在指定日期之后显示数据。
该日期将由最终用户定义。我可以对数字执行此操作，但是一旦我尝试对日期执行此操作，宏就会运行，结果是没有显示数据。

我的数据表称为“数据”
包含日期的列是第 8 列(字段 8)
我想定义我得到的数据的输入日期在单元格 H1 中
我在英国(也许有影响？？？)
我不想开始转换我的基础原始数据。

我想我正拼命想让单元格 H1 被“视为”一个日期

下面的代码:

Sub Macro_show_data_after_inputted_date

    Sheets("Data").Select
    Range("C15").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$4:$AJ$2875").AutoFilter Field:=8, Criteria1:=">" & Range("H1"), _
        Operator:=xlAnd
End Sub

Answer 1

这是一个数字格式问题。 Range.AutoFilter method期望它的标准与它正在过滤的值的格式相同。可以使用 Range .Text property 检索单元格的显示值(也称为格式化文本) .

Sub Macro_show_data_after_inputted_date

    with Sheets("Data")
        if .autofiltermode then .autofiltermode = false
        with .Range("C15")
            .AutoFilter Field:=8, Criteria1:=">" & .Range("H1").TEXT
        end with
    end with

End Sub

如果您记录相同的操作并故意输入错误的日期格式，您将在生成的记录代码中看到它在用作字符串标准之前是正确的。