different the Capital letter in 1st 5 character using VBA excel 2003

[alexandro88]

Hi ,

This is my Table in sheet excel 2003, i use filter in column IdNum and Channel:
Quote:
IdNum Channel
214U-Press Web Pass
234U-Multimedia Fail
2345-Games Fail
45U-University Fail
455-School Pass
611U-Multi Pass
554-primary Fail
Then i write a script in VBA excel 2003 to list Channel= Fail. This is my code:
Code:
Sub Column()
Worksheets("Case Details").Range("R4").AutoFilter _
Field:=18, _
Criteria1:="Failed", _
VisibleDropDown:=True
End Sub
The output is like this:
Quote:
IdNum Channel
234U-Multimedia Fail
2345-Games Fail
45U:University Fail
554-primary Fail
Then i want to different IdNum that contain Capital letter " U" in 1st 5 character .The output i want is like this:
Quote:

IdNum Channel
234U-Multimedia Fail
45U-University Fail

How to different it ? I need to write in VBA excel 2003 code. Any 1 can help me?

[mikerickson]

Cross posted
http://www.mrexcel.com/forum/showthread.php?t=508718
http://www.ozgrid.com/forum/showthread.php?t=147987
http://www.vbaexpress.com/forum/showthread.php?t=34973