code VBA qui passe directement à la fin

Bonjour j'ai tappé du code. Seulement celui ci ne fonctionne pas et quand j'utilise le pas a pas détaillé il ne lit pas toute les lignes de code. 8O

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

Sub tt()   For i = 2 To i = 38   If Cells(i, 1).Value = "12 / 4 / 2012" Then   If Cells(i, 2).Value = "Fille" Then   If Cells(i, 3).Value = "Blonde" Then   Cells(i, 5).Value = "oki"   End If End If End If       Next       Merci       End Sub

---

Salut,

si la date est fausse, la fonction va directement à la fin. Et vu ton test, il y a de très forte chance que le test retourne Faux.

Pour la boucle on fait

Code:

---

For i=2 to 38

---