2017-05-05 4 views
1

Ich versuche, eine Spalte zu filtern, wie ich viele Male früher hatte. Aber immer Fehler wie folgt:VBA Excel: Filter eine Spalte

1004: „Autofilter-Methode des Range-Klasse ist fehlgeschlagen“

Set wkb1 = Workbooks.Open("D:\Meru\Work\Trace Reports\Automation\Macro Codes\" & CFname & "\Daily Pivots -" & CfolderN & ".xls") 

With wkb1.Worksheets("winloss") 
    LastRow5 = .Cells(.Rows.Count, "A").End(xlUp).Row 
    'MsgBox LastRow 
    Set My_Range = .Range("V1:V" & LastRow5) 
    'MsgBox My_Range 
    My_Range.AutoFilter Field:=22, Criteria1:="Won", Operator:=xlFilterValues 
    ' LastRow = .Cells(.Rows.Count, "G").End(xlUp).Row 

    .UsedRange.Copy 
End With 

With wkb1.Worksheets("Trial") 
    .Range(.Cells(1, "A"), .Cells(LastRow5, "A")).PasteSpecial xlPasteValues 
End With 

Antwort

3

Da der Bereich gefiltert werden soll, enthält nur eine Spalte, sollte es so sein ...

My_Range.AutoFilter Field:=1, Criteria1:="Won", Operator:=xlFilterValues 
+0

Vielen Dank ... Sie sind Gott ... – meru

+0

Gern geschehen Meru! Froh, dass ich helfen konnte. Bitte nehmen Sie sich einen Moment Zeit, um die Antwort zu akzeptieren, um Ihre Frage als gelöst zu markieren. – sktneer