在下一张工作表中填充数据库中的表（使用多个筛选器）

问：

“我有 2 张纸，1 张有数据库，另一张有表格，我需要用过滤数据得出的计数来填充。每天需要根据日期在表中填充数据

筛选后，需要将今天日期的一组过滤器填充到工作表 2 中，该工作表具有日期方面的条件。这份报告将每天运行，所以我只需要继续旧的值，并在今天的日期中过去。如果筛选后计数为 0，则应根据当天的条件填充 0。所以我想过滤和填充，再次过滤和填充所有条件（每个条件的过滤字段是 diff）

参考表

标准 04-10月 05-10月 06-10月

COF 准备阶段 CAT1/2 – 延迟> 1 天 13 2 2

COF 准备阶段 CAT3 – 延迟> 1 天 6 7 7

COF Prep Stage CAT4 – 延迟> 1 天

当前代码 - 仅过滤第一个条件，但不会停留在它将如何转到另一个工作表上，根据特定日期和条件填充表中的过滤器计数'

    With Sheets("1.COF WIP>1 1day")

    If .AutoFilterMode Then .AutoFilterMode = False
    
    With .Range("$A:$Y")

    .AutoFilter Field:=4, Criteria1:="CAT 1-2"

    .AutoFilter Field:=24, Criteria1:=">1"

    .AutoFilter Field:=23, Criteria1:=xlFilterToday

End With

End With