Mise en forme conditionnelle et texte
Bonjour,
Problème que je n'arrive pas à résoudre et pourtant je suis sûr que c'est simple.
Je voudrais que la cellule F15 passe en font rouge si la cellule F5 est égal à "X" . ça c'est facile (Mise en forme conditionnelle)
Là ou je bloque, je voudrais que la cellule F15 affiche "Ok" SANS formule dans la cellule F15
Merci pour votre aide.
Salut Jefekoi,
Sans formule : VBA, je ne vois pas d'autre solution.
Private Sub Worksheet_Change(ByVal Target As Range)
'
Application.EnableEvents = False
'
If Not Intersect(Target, [F5]) Is Nothing Then _
[F15] = IIf([F5] = "X", "OK", ""): _
[F15].Interior.ColorIndex = IIf([F5] = "X", 3, xlColorIndexNone)
'
Application.EnableEvents = True
'
End SubA+
C'est bien ce qu'il me semblait ..
Merci