bonjour a tous

voila quand j’écris ceci cela fonctionne

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
If Interface.TextBox96.Value = Feuil4.Range("B44").Value ThenInterface.TextBox96.BackColor = Feuil4.Range("B44").Interior.color
End If
donc du coup j'ai voulu faire mieux mais la cela ne marche pas quelqu'un peut il m'aider.

mon souci est le suivant

j'aimerais que si dans le textbox96 la valeur est une des valeurs de la feuil4 de b44 a b60
alors le fond du textbox96 prend la couleur de la cellue concernée

exemple :

feuil4 en B44 lettre G couleur verte
B45 lettre C couleur rouge
B46 lettre Z couleur jaune
B47 lettre U couleur rose etc etc

donc
si le textbox96 est = a "U" alors il color le textbox96 en rose
si le textbox96 est = a "C" alors il color le textbox96 en rouge etc etc

voici ce que j'ai ecrit mais cela ne marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
If Interface.TextBox96.Value = Feuil4.Range("B44:B65").Value Then
Interface.TextBox96.BackColor = Feuil4.Range("B44:B65").Interior.color
End If
merci encore de votre aide