The InStr() condition should work. Have you step debugged? Is the subject pulled?

If olMail.Subject LIKE "*Customer ID*" Then