vba mise en forme conditionnelle

Bonsoir à tous, j'ai préparé un petit code VBA pour de la mise en forme conditionnelle (emplissage de l'intérieur de cellule selon les mots dans la cellule, mots issus d'une liste déroulante). il y a 4 mots possibles, dont 3 que je souhaite mettre en forme avec une couleur. Le problème est que...