Lancer une macro sur changement de valeur cellule

Bonjour,

Je teste le bout de code de cette discussion avec office 2007 et malheureusement il ne se passe rien au changement de valeur.
J'ai créé simplement cette macro :

Code:

---

1 2 3 4 5

Sub testjna(ByVal Target As Range) If Target.Address = "$B$2" Then MsgBox "oups" End If End Sub

---

Il ne se passe rien quand je change la valeur de la cellule B2.
Faut il préciser le nom de l'onglet ou quelque chose d'autre?

Merci

Citation:

---

Il ne se passe rien quand je change la valeur de la cellule B2.
Faut il préciser le nom de l'onglet ou quelque chose d'autre?

---

Relis les réponses de Pierre, tu commences ton code par cette ligne

Code:

---

1 2	Sub testjna(ByVal Target As Range) .....

---

or il faut regarder du coté de l'évènement "Change", Pierre l'écrit :

Code:

---

1 2 3 4 5 6

Sub Worksheet_Change(ByVal Target As Range) If Target.Address="$A$1" Then ... End If End Sub

---

que je traduirais, dans ton cas, :

Code:

---

1 2 3 4 5

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$B$2" Then MsgBox "oups" End If End Sub

---