VBA Excel：筛选一列

我正在尝试过滤一个列，就像我以前的许多次一样。 但是得到错误如下：

1004：“范围类的自动筛选方法失败”

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