Recherche Chaine de carateres dans cellule

Bonjour,

je voudrais savoir comment faire pour savoir si une cellule contenant plusieurs mots contient un mot en particuliers.

Par exemple j'ai plein de cellule contenant:
-Devise USD
-Devise EUR
-Devise USC Canadien
-...

je voudrais savoir si la cellule contient "USD" ou "EUR", ainsi de suite...

Mon code est le suivant, mais ne marche pas.
IF Cells(PremiereLigne + i, DeuxiemeColonne).Value = "*EUR*" Then
......
END IF

Comment faire ?

merci