2011-01-05 17 views
1

Ehrfürchtig Stackoverflow Benutzer,Excel VBA Filtering Ausgabe

das ich habe Schwierigkeiten mit etwas, das einfach genug scheint nicht so viel Ärger zu verursachen. Ich versuche, ein bestimmtes Blatt anhand eines Kriteriums zu filtern. Hier ist der Code:

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 

Aus irgendeinem Grund die letzte Zeile, wo ich den Filter tatsächlich anwenden hält dass sie mir die folgende Fehlermeldung:

Runtime Error '448' 

Named argument not found 

Bin ich etwas wirklich dumm mit diesem?

Danke!

Update:

So fand ich eine Lösung. Hier ist, wie es aussieht:

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 

Ich bin nicht ganz sicher, warum das funktioniert & die vorherigen nicht so, wenn es mir jemand erklären kann, das wäre wunderbar. Danke noch einmal!

Antwort