excel - 过滤行以仅包含从“今天”到周日的值

Question

我们有一个每周功能，我们需要确保包含的数据仅包含从报告创建之日到下一个星期日的值。我知道我遇到的问题是我的EndDate值无法格式化为yyyy-mm-dd，但我不知道如何前进。这就是我所拥有的：

' set value for 'EndDate'
Dim EndDate As Date
    EndDate = DateAdd("d", -Weekday(Now) + 8, Now)
    
' reformat 'Required End' column to "yyyy-mm-dd"
ActiveSheet.Range("F2", "F50000").NumberFormat = "yyyy-mm-dd"

' filter results from StartDate to EndDate
ActiveSheet.ListObjects(1).Range.AutoFilter Field:=6, _
                               Criteria1:=">=" & Format(Date, "yyyy-mm-dd"), _
                               Operator:=xlAnd, _
                               Criteria2:="<=" & Format(EndDate, "yyyy-mm-dd")

我收到错误： Run time error '9': Subscript out of range

标签： excelvba