XL 2019 Double-clic en C2 ou "ok", colore de A2:I2, si C4, alors A4:I4 colorer de vert [résolu]

[anthoYS]

Bonjour,

J'avais fait des topic déjà à ce sujet mais je ne sais plus comment faire...
=SI(C2="ok";....)
je m'y perds...

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 3 Then
Cells(Target.Row, 3) = Date
End If
End Sub

Rajouter un calendrier quand on clique sur date, voir USF présent dans le fichier...


Merci par avance,
je sais c'est basique mais je bloque...

 

[sylvanu]

Voir PJ #11, le Endif est présent.

 

[anthoYS]

Voir PJ #11, le Endif est présent.

oui, mais c'est moi qui avais copié la ligne sans ouvrir le fichier.
cette ligne

 If (Target.Column = 4 Or Target.Column = 5) And Target.Columns.Count = 1 Then

et je l'ai agrégé à l'autre code évidemment ça a planté, suis cruche.