我可以应用自动筛选条件,但筛选的行不可见。但是,如果我转到高级过滤器,并在已应用的过滤器上单击"确定",则会显示结果。我不知道发生了什么,这是代码。
try xl := ComObjActive("Excel.Application")
catch e
{
xl := ComObjCreate("Excel.Application")
}
wb_YTD := xl.Workbooks.Open(A_Desktop "R&B YTD.xlsx")
if (WinExist("BnR Weekly Counts"))
wb_bnr := xl.Workbooks.Item("BnR Weekly Counts")
else
wb_bnr := xl.Workbooks.Open(A_Desktop "BnR Weekly Counts.xlsx")
wb_YTD.Sheets(1).AutoFilter.Range.Autofilter
FormatTime, current_month, YYYYMMDDHH24MISS, M
criteria1 := "> " current_month "/9/" A_Year
criteria2 := "< " current_month "/11/" A_Year
wb_YTD.Sheets(1).Range("$A$1").AutoFilter(Field := 3,Criteria1 := criteria1, Operator := 1, Criteria2 := criteria2)
这里,第3列包含我要筛选的日期,Criteria1为>2/9/2020,Criteria2为<2020年2月11日
谢谢!
发现错误,标准">"中的额外"空间"导致了此错误
工作过滤器代码:
FormatTime, current_month, YYYYMMDDHH24MISS, M ; To store the month count without extra 0
start_date := ">=" current_month "/9/" A_Year
end_date := "<=" current_month "/15/" A_Year
wb_YTD.Sheets(1).Range("A1:F10000").AutoFilter(Field := 3,Criteria1 := start_date, Operator := 1, Criteria2 := end_date)