teatimecrumpet
Active Member
- Joined
- Jun 23, 2010
- Messages
- 307
Hi,
I'm trying to autofilter a list for multiple criteria. But I'll get a "Run-Time Error '1004': Application-defined or object-defined error". I believe it has something to do with some criteria not showing up in the filter field. Is there a way to filter if found but not then ignore?
With Sheets("Preliminary")
.AutoFilterMode = False
.Range("A1:L1").AutoFilter
.Range("A1:L1").AutoFilter Field:=2, Criteria1:="254939457", _
Operator:=xlAnd, Criteria2:="254939341", _
Operator:=xlAnd, Criteria3:="254939382", _
Operator:=xlAnd, Criteria4:="254939416", _
Operator:=xlAnd, Criteria5:="254939325", _
Operator:=xlAnd, Criteria6:="254939887", _
Operator:=xlAnd, Criteria7:="254939317", _
Operator:=xlAnd, Criteria8:="254939390", _
Operator:=xlAnd, Criteria9:="254939374", _
Operator:=xlAnd, Criteria10:="254939333"
End With
thanks,
Mike
I'm trying to autofilter a list for multiple criteria. But I'll get a "Run-Time Error '1004': Application-defined or object-defined error". I believe it has something to do with some criteria not showing up in the filter field. Is there a way to filter if found but not then ignore?
With Sheets("Preliminary")
.AutoFilterMode = False
.Range("A1:L1").AutoFilter
.Range("A1:L1").AutoFilter Field:=2, Criteria1:="254939457", _
Operator:=xlAnd, Criteria2:="254939341", _
Operator:=xlAnd, Criteria3:="254939382", _
Operator:=xlAnd, Criteria4:="254939416", _
Operator:=xlAnd, Criteria5:="254939325", _
Operator:=xlAnd, Criteria6:="254939887", _
Operator:=xlAnd, Criteria7:="254939317", _
Operator:=xlAnd, Criteria8:="254939390", _
Operator:=xlAnd, Criteria9:="254939374", _
Operator:=xlAnd, Criteria10:="254939333"
End With
thanks,
Mike