For X5 = 2 To TAB5 sur mon tableau (qui fait 2500 lignes)
If Feuil6.Cells(x, 12).Value = "MANQUE APPROS" Then Exit For 'je vérifie la condition 1 et je sort dans ce cas'
If Feuil5.Cells(X5, 4).Value = Feuil5.Cells(X2, 4).Value Then Feuil5.Cells(X5, 5).Value = Feuil5.Cells(X5, 5).Value - Feuil5.Cells(X2, 1).Value: je vérifie si mes données sont identiques et si c'est le cas je modifie une valeur
Next X5