过滤几个日期的循环

Question

关于使用Filter with Loop，我有以下问题。

我有几个交货日期和库存主数据。我想在交货日期前一天显示库存（A590栏）。这必须在几个日期之前完成，直到今年年底。我有过滤交货的基本代码，直到交货日期前一天。但它什么都没显示。并且我不知道如何在随后的几天内进行循环，以便它在每个交货日期前一天计算库存。

Sub DT_Filter()
    ActiveSheet.Range("$G$1:$G$585").AutoFilter Field:=1, Criteria1:="<=" & Range("A590")
End Sub

Answer 1

Excel中的日期＆amp; VBA有点复杂 - MSDN Date Systems in Excel。你编写样本的方式，它比较文本。因此，尝试转换为数字以进行更好的比较：

Sub DT_Filter()
    Range("A3:A10").AutoFilter Field:=1, Criteria1:="<=" & CLng(Range("A1"))
End Sub

因此，如果你制作一个像这样的小样本：

您可以在运行上面的代码之后过滤09年3月和3月3日：