[VBA-E]Gestion de la touche "enter"

Bonjour,

Je débute en VBA sous excel (Faut bien!!) et mon problème est le suivant:
j'aimerais après avoir inscri le mot "OUI", valider par "ENTER" et que toute la ligne (ou rangée) se grise (ou une autre couleur).
Je dois avouer que je sèche.

Merci

Citation:

---

j'aimerais après avoir inscri le mot "OUI", valider par "ENTER"

---

on peut savoir dans quoi ? (cellule, textbox, ....?)

Sur une feuille, 50 rangées sur 30 colonnes.
Validation par "OUI" dans la trentième colonne puis "ENTER".
Et "grisage" de la rangée entière contenant le "OUI"

Rangée=ligne.
Je vais essayer ton code.

En fait j'y pige pas grand chose à ton code.
On le met où?
Pour une ligne entière en gris comment on fait?
Comment savoir que c'est bien le mot OUI que l'on a rentré?
Comment griser la ligne (c'est à dire toutes les cellules précédant la cellule OUI)?

Merci...je sais je ne suis pas doué!!

C'est à peu près ça que je desirais...c'set cool!!
En fait je voudrais juste griser les cellules jusqu'à OUI

(bla) (bla) (bla) (bla) (bla) (OUI) (cellulex) (cellulex+1)...(cellulex+n)

Après le OUI les cellules doivent rester "blanches".

Bon, mais ton code est proche de mes désir et je vais essayer de trouver tout seul!!

Merci

Ouais c'est cool....
T'es rapide...
Maintenent le coder pour n'importe qu'elle ligne!!
Je m'y mets!!

@+

Je suis arrivé (grâce a votre aide!!!) a ce résultat qui me conviens:

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Worksheet_Change(ByVal Target As Excel.Range) Dim NoLigne, NoColonne NoColonne = Target.Column NoLigne = Target.Row If LCase(Range(Target.Address).Value) = "OK" Then Range(Cells(NoLigne, 1), Cells(NoLigne, NoColonne)).Interior.ColorIndex = 15 Else Rows(Target.Row).Interior.Pattern = xlNone End If End Sub

---

Cela me permet de griser la ligne que si OK majuscule est reconnu.

Encore Merci.