Code for AutoFilter Items

[mubashir aziz]

Hi,

I am facing a problem that I am preparing a sheet which is controlling a document control record, there are different types like "in Progress", "Waiting Response" and delays like 3 Day(s) Delay, 5 Day(s) Delay, etc.

Firstly I applied this code and it worked nicely

ActiveSheet.Range("$A$3:$W$526").AutoFilter Field:=17, Criteria1:=Array( _
"17 Day(s) Delay", "5 Day(s) Delay", "In Progress", "Waiting Response"), Operator _
:=xlFilterValues


But there are lot of documents which are 17, 20, 1 , 4. 10 days delays so i used below code, which worked nicely too

ActiveSheet.Range("$A$3:$W$526").AutoFilter Field:=17, Criteria1:=Array( _
"*Delay*", "Waiting Response"), Operator:=xlFilterValues

But as soon as i enter another items "In Progress", it filter only the items of "Waiting Response" and "In Progress". it skip "**Delay*" values by not selecting them.

ActiveSheet.Range("$A$3:$W$526").AutoFilter Field:=17, Criteria1:=Array( _
"*Delay*", "Waiting Response", "In Progress"), Operator:=xlFilterValues


Can someone help me that what's wrong with this code?



Even if i use some other items like "IFC, "IFI", it still works but wild character with delay is not working. I have used "=*delay*", "*delay*" and every time its working but as soon as i select 3rd items it stops working.

I have posted this problem on other forum too but no response so If i'll get any response, I'll post here.

Sample column


Status
Waiting Response
17 Day(s) Delay
5 Day(s) Delay
5 Day(s) Delay
5 Day(s) Delay
In Progress
Waiting Response
Waiting Response
Waiting Response
Waiting Response
Waiting Response

[mubashir aziz]

Sorry Guys I think my post should move to VBA / MACRO section.