VBA Excel：過濾列

Question

我想過濾一個列，因爲我有更早的時間。但是，得到如下錯誤：

1004：「Range類的自動篩選方法失敗」

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 

Answer 1

由於要過濾的範圍只包含一列，它應該是這樣的......

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