cathodique
XLDnaute Barbatruc
Bonjour,
Faisant suite à ce fil https://www.excel-downloads.com/threads/formulaire-de-modification.20027552/
J'ai eu des propositions qui ne correspondent pas exactement à mes attentes.
Je dois aussi bien comprendre les codes pour essayer de les adapter à mes besoins.
Sur mon userform, une textbox récupère un numéro de facture au clic dans une listbox.
Le code ci-dessous ne plante mais je ne comprends pas pourquoi, je dois cliquer à 2 reprises sur ok pour que le message (MsgBox) se ferme.
Merci pour votre précieuse aide.
Bon dimanche.
ps: le fichier joint est en cours de correction.
Faisant suite à ce fil https://www.excel-downloads.com/threads/formulaire-de-modification.20027552/
J'ai eu des propositions qui ne correspondent pas exactement à mes attentes.
Je dois aussi bien comprendre les codes pour essayer de les adapter à mes besoins.
Sur mon userform, une textbox récupère un numéro de facture au clic dans une listbox.
Le code ci-dessous ne plante mais je ne comprends pas pourquoi, je dois cliquer à 2 reprises sur ok pour que le message (MsgBox) se ferme.
VB:
Private Sub ComboBox2_Change()
If Me.TextBox2 <> "" Then 'signifie aussi: aucune ligne sélectionnée dans la Listbox
Me.TextBox3.Value = ComboBox2.List(Me.ComboBox2.ListIndex, 1)
Me.TextBox9.Value = ComboBox2.List(Me.ComboBox2.ListIndex, 2)
Else
Me.ComboBox2="": Me.TextBox3 = "": Me.TextBox9 = ""
MsgBox "Sélectionnez la ligne à modifier.", vbCritical, "ERREUR DE MANIPULATION"
End If
End Sub
Bon dimanche.
ps: le fichier joint est en cours de correction.