Macro pour écrire texte si cellule colorée

Bonsoir

Je cherche une solution pour lorsque une cellule d'une colonne est vide , la cellule d'à cote se colore en rouge avec un texte .

Seul soucis , cette cellule avec le ne peut contenir une formule car je dois pouvoir y écrire autre chose.

Est ce possible avec une macro.

Mon exemple est joint

Merci pour l'aide

Ja

Bonjour,

A mettre dans le module de la feuille et supprimer la MFC :

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Column <> 3 Then Exit Sub
    If Target.Count > 1 Then Exit Sub

    Application.EnableEvents = False

    If Target.Value = "" Then

        Target.Offset(, -1).Value = "A voir"
        Target.Offset(, -1).Interior.Color = 49407

    Else

        Target.Offset(, -1).Value = "OK"
        Target.Offset(, -1).Interior.Color = 16777215

    End If

    Application.EnableEvents = True

End Sub

Bonjour Jave These le forum

moi j'ai fait pour traiter le tableau complet !!

et surtout pour pouvoir écrire n'importe quoi dans la colonne B si la colonne C est remplie

a+

Papou

Bonjour à tous

Tout d'abord merci pour l'aide apporter.

J'ai repris pour mon projet la solution de Paritec.

Par contre j'ai voulu modifier une données à savoir au lieu que la cellule soit = "" , je voudrais qu'elle soit < -70.

Et là j'ai 3 lignes où ça ne fonctionne pas.

Je joins la V2 pour que ça soit plus clair....

Encore merci

Ja

Bonsoir Jave le forum

bah oui modifié comme cela c'est sur que cela ne marchera pas !!!

a+

Papou