Quand le code ne fonctionne que en mode pas a pas

Bonjour ,

j'ai un code qui semble très simple cependant je ne comprend pas pourquoi la ligne 5 passe inaperçu lors de l'execution de la macro, j'ai essayé de l'executé en "pas a pas" pour debugger mais là, miracle ça marche, donc me voila un peu perdu ...

Code:

---

1 2 3 4 5 6 7 8 9

For Each ligneSuivi In MaPlage.Rows If ligneSuivi.Cells(5) Like "*,*" Then FeuilleInvent.Cells.AutoFilter Field:=4, Criteria1:=ligneSuivi.Cells(4).value TraceCML.Cells(ligneFichier, 1) = ligneSuivi.Cells(4) TraceCML.Cells(ligneFichier, 2) = FeuilleInvent.Cells(Cells(Rows.Count, 4).End(xlUp).Row, 6).value TraceCML.Cells(ligneFichier, 3) = ligneSuivi.Cells(5) ligneFichier = ligneFichier + 1 End If Next

---

Merci d'avance pour votre aide

Bonjour
Essaye en insérant un Doevents juste après ta ligne 3

Désolé c'est juste moi qui suis idiot la ligne 5 etait fausse (voici ce le code bon)

Code:

---

TraceCML.Cells(ligneFichier, 2) = FeuilleInvent.Cells(FeuilleInvent.Cells(Rows.Count, 4).End(xlUp).Row, 6).value

---

et vu que je faisait du pas a pas sur FeuilleInvent ça marchait mais je faisait l'execution sur une autre feuille donc autant pour moi ...