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 ...
Merci d'avance pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
Partager