Sheets("Stock").Range("d" & Me.CB_Pièce.ListIndex + 4) = Sheets("Stock").Range("d" & Me.ComboBox2.ListIndex + 4) + Me.Quantitetr.Value
Sheets("Stock").Range("d" & Me.CB_Pièce.ListIndex + 4) = Sheets("Stock").Range("d" & Me.ComboBox1.ListIndex + 4) - Me.Quantitetr.Value