nrdz83
XLDnaute Impliqué
Bonjour à tous,
voila dans un Userform1 j'ai une combo_TypeConfections qui est alimenté via ce code
Lorsque je veux ajouter des nouveaux éléments j'utilise l'Userform2 avec ce code
Ce que je cherche c'est que la combo_TypeConfections se met à jour lorsqu'il y a de nouvelle saisie.
En cherchant un peu sur le nbet j'ai vu qu'il fallait faire Call Userform.initialize mais en vain je n'y arrive pas.
Pourrais-je avoir un peu d'aide pour résoudre ce problème?
Par avance je vous remercie.
voila dans un Userform1 j'ai une combo_TypeConfections qui est alimenté via ce code
Code:
Private Sub Userform_Initialize()
DTPicker1.Value = Now
Me.Combo_TypeConfections.RowSource = "Données!Type_Confections" 'Alimente la combobox type de confections
Me.Combo_Destinations.RowSource = "Données!Destinations" 'Alimente la combobox Destinations
End Sub
Lorsque je veux ajouter des nouveaux éléments j'utilise l'Userform2 avec ce code
Code:
Private Sub CommandButton2_Click()
Dim DerLig As Long
With Sheets("Données")
DerLig = .Range("E" & Rows.Count).End(xlUp).Row + 1
.Cells(DerLig, 5).Value = Application.Proper(TextBox1)
Call mefcConfections ' met en forme la saisie
Call ClasseTypeConfections 'Classe par ordre alphabétique les saisies
End With
'Vide le textbox
TextBox1 = ""
End Sub
Ce que je cherche c'est que la combo_TypeConfections se met à jour lorsqu'il y a de nouvelle saisie.
En cherchant un peu sur le nbet j'ai vu qu'il fallait faire Call Userform.initialize mais en vain je n'y arrive pas.
Pourrais-je avoir un peu d'aide pour résoudre ce problème?
Par avance je vous remercie.
Dernière édition: