Coloriser cellule suivant valeur premier chiffre valeur autre cellule

Bonjour,

Je cherche à coloriser une cellule suivant le premier chiffre de la valeur d'une autre cellule.

Par exemple, je veux coloriser A1 en rouge si B1= 1*****, la même cellule A1 en vert si B1=2*****......

Merci

Bonjour,

Sub Test ()

If Left(Cells(1,2).Value,1) = 1 Then
Cells(1,1).Interior.Color = RGB(255,0,0)
ElseIf Left(Cells(1,2).Value,1) = 2 Then
Cells(1,1).Interior.Color = RGB(0,255,0)
End If

End Sub

Bonjour evan38 et merci d'avoir répondu. Je souhaiterais une solution uniquement par formule (MFC), pas VBA, car j'utilise le fichier en online ( sharepoint).

Désolé j'ai oublié de le préciser...

D'accord, malheureusement les formules c'est pas mon domaine, je laisse ma place :)

Ok pas grave. encore Merci.

Bonjour,

Une solution avec les mises en forme conditionnelle.

Cordialement.

Bonjour BatorFreuh et merci d'avoir répondu. C'est à peu prés ce que je cherche, mais comment fait on pour coloriser la cellule suivant une valeur qui commence par un chiffre. Par exemple si çà commence par 18****** coloriser par une couleur, si ça commence par 10****** coloriser par une autre couleur ainsi de suite....

Merci

Bonjour Vincent,

Tu peux voir sur mon screenshot les différentes conditions de la mise en forme.

Dans la case "S"applique à" tu sélectionnes la plage de cellules que tu veux colorier.

Tu va définir la condition de colorisation par la formule

=GAUCHE(Cellule à regarder;Nombre de caractères à regarder)="Caractères à chercher"

.

Voila ce que ça donne en modifiant la valeur de B1.

Cordialement.

Merci à toi ça fonctionne.