Bonjour à tous,
J'ai modifié à nouveau mon code sur l'USF 7 et il fonctionne "presque"...
Je n'arrive toutefois pas à solutionner le problème suivant : Je ne parviens pas à concaténer la TextBox1 qui doit prendre la valeur soit de ComboBox1 si le produit existe déjà, soit TextBox2.Text & "-" & TextBox7.Text & TextBox8.Text, ou bien TextBox5.Text & "-" & TextBox7.Text & TextBox8.Text si il y a une "Marque" dans la fiche produit.
De plus, pour une raison que j'ignore, quand la ComboBox1 est remplie, je suis obligé de faire un "retour arrière" sur la TextBox1 pour qu'une valeur s'affiche
Private Sub TextBox1_Change()
If ComboBox1 <> "" Then
' La condition est s'il y a une marque, la TextBox5 (Marque en TextBox4) prend l'avantage sur la TextBox2 (Code fournisseur)
If TextBox4 = "" Then
TextBox1.Text = TextBox2.Text & "-" & TextBox7.Text & TextBox8.Text
Else
TextBox1.Text = TextBox5.Text & "-" & TextBox7.Text & TextBox8.Text
End If
End If
End Sub
Je continue à chercher, on verra après pour l'USF6 qui est censé chercher les éléments sur plusieurs feuilles concernant le produit sélectionné...
Bonne journée à tous,
Joe