如何修复使用自动过滤器时对象范围失败

Question

vba中的自动过滤器为我提供了范围错误的方法

我尝试更改范围和变量。

Private Sub Names_Afterupdate()
Dim ws As Worksheet
Dim strname As String
Set ws = Worksheets("LookupLists")
strname = Me.Names.Value

Columns("J:J").AutoFilter _
Field:=10, _
Criteria1:="=*" & strname & "*", _
Operator:=xlAnd

End Sub

我只想过滤表的I：J列，而.autofilter部分给我错误