bonjour ,
j aimerai colorier la ligne de la cellule active en une couleur lorsque j entre ok ds cette cellule
voici mon sub, il fonctionne mais il faut que je reclic sur la ligne alors que j aimerai juste faire : "ok" puis touche entrer et sa passe en rouge.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If ActiveCell.Value = "ok" Then
ActiveCell.EntireRow.Select
Selection.Interior.ColorIndex = 3
End If
End Sub

merci