我有以下代码块来取出各种错误并将错误代码描述分配给数据。只要过滤器返回结果,它就可以正常工作。如果没有,则删除标题行。我怎样才能防止这种情况发生?提前致谢。Excel Vba - 动态过滤器范围删除
Sheets("Tempsheet").Select
Range("A1:K1").AutoFilter
Range("A1:K1").AutoFilter Field:=5, Criteria1:="0", Criteria2:=0
Range("K2:K" & Range("A" & Rows.Count).End(xlUp).Row).Formula = "Excluded: $0.00 Amount"
Range("A2:K" & Range("A" & Rows.Count).End(xlUp).Row).EntireRow.Copy
Sheets("Excluded").Select
Range("A2").PasteSpecial
Sheets("Tempsheet").Select
Range("A2:K" & Range("A" & Rows.Count).End(xlUp).Row).EntireRow.Delete
Sheets("Tempsheet").AutoFilterMode = False
感谢您对所有问题的答案,正是我需要的! – kwilmarth
没问题。值得注意的是,无论您的数据布局如何(即,如果它开始于第2行还是第10行而非第1行),SpecialCells方法都可以工作,因此它提供了超出当前布局的灵活性。 – brettdj