使用宏在过滤器中删除多个数据值

Question

假设我有一组数据，并且我想过滤列日期。我有另一个宏，可以生成日期值（要过滤的值）。该值是日期的多个值，并且每次都可以是不同的值（但格式相同）。预期结果将是过滤后的源表。

所以我想使用宏在日期列中应用这些值。有什么有效的方法吗？

源数据和预期结果如下

Answer 1

最有效的方法是过滤器。但是您的value to be filtered的格式必须更改。

我使用AdvancedFilter方法。

Sub test()
    Range("A1:C8").AdvancedFilter _
        Action:=xlFilterCopy, _
        CriteriaRange:=Range("F1:G2"), _
        CopyToRange:=Range("I1:K1"), Unique:=False
End Sub

然后