bonjour a vous les acteurs de ce forum
je voudrais bien avoir un explicatif de ce code car d'après ce qui est écrit en vert la mise a jour de la qte stock devrai ce faire hors elle se contente de se mettre en feuille réception
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Feuil9.Cells(m, 6) = PUA Feuil9.Cells(m, 7) = Qté_Cdée Feuil9.Cells(m, 8) = Qté_rec Feuil9.Cells(m, 9) = Prix_Tot 'MAJ la qté en stock i = 2 While Feuil5.Cells(i, 1) <> "" If Feuil5.Cells(i, 1) = RefProd Then Feuil5.Cells(i, 7) = Feuil5.Cells(i, 7) + Diff_qté_rec TextBox_Qté_sto = Feuil5.Cells(i, 7)si vous avez une idée je suis preneuret que veux dire i = 2
While Feuil5.Cells(i, 1) <> ""
cordialement
Pascal
Partager