Excel VBA过滤问题

Question

Awesome Stackoverflow用户，

我遇到了一些似乎很简单但不会导致这么大麻烦的​​事情。我试图根据标准过滤给定的工作表。下面是代码：

Sub FilterWorksheet(sCriteria As String) 
    'First, clear the filter 
    ThisWorkbook.Worksheets("MyAwesomeSheet").AutoFilterMode = False 

    'Then apply the filter for the Transfer_From_seg column 
    ThisWorkbook.Worksheets("MyAwesomeSheet").AutoFilter Field:=2, Criteria1:=sCriteria 
End Sub 

出于某种原因，我在那里实际应用过滤器的最后一行一直给我下面的错误信息：

Runtime Error '448' 

Named argument not found 

我做得这个真的愚蠢吗？

谢谢！

更新：

所以我找到了一个解决方案。这里是什么样子：

Sub FilterWorksheet(sCriteria As String) 
    'First, clear the filter 
    ThisWorkbook.Worksheets("MyAwesomeSheet").AutoFilterMode = False 

    'Then apply the filter for the Transfer_From_seg column 
    ThisWorkbook.Worksheets("MyAwesomeSheet").Range("A:H").AutoFilter Field:=2, Criteria1:=sCriteria 
End Sub 

我不明白为什么这个工程&以前的一个不那么如果有人能向我解释，那是最好不过。再次感谢！

Answer 1

您需要指定要过滤的范围。例如：

ThisWorkbook.Worksheets("MyAwesomeSheet").Range("B3:C11").AutoFilter field:=2, Criteria1:=sCriteria 

Autofilter Method in the Excel 2003 VBA Language Reference