I have the following code:
.Range.AutoFilter Field:=.ListColumns("Type").Index, Criteria1:="=Phone", Operator:=xlAnd, Criteria2:="=Router", Operator:=xlAnd, Criteria3:="=Telecommunications Equipment", Operator:=xlAnd, Criteria4:="=Network Product", Operator:=xlAnd, Criteria5:="=Headset"
When...