Bonsoir à tous,
J'ai une erreur dont je ne comprend pas la provenance. Ci dessous, le message qui apparait lorsque je lance ma userform :
Par contre, lorsque je lance mon userform a partir de l'espace développeur j'ai pas ce problème et après je peux ouvrir mon userform normalement sans problème.
J'ai essayé plusieurs choses, ça a marché une ou deux fois et ça revient. Je suis perdu
Mon code pour lancer mon userform:
Sub openUserform1()
UserForm1.Show
End Sub
Le code d'initialisation :
Private Sub UserForm_Initialize()
ComboBox_secteur.List = Worksheets("BDD VBA").Range("A2:A7").Value
ComboBox2_Secteur.List = Worksheets("BDD VBA").Range("A2:A7").Value
ComboBox3_Secteur.List = Worksheets("BDD VBA").Range("A2:A7").Value
ComboBox4_Secteur.List = Worksheets("BDD VBA").Range("A2:A7").Value
Me.MultiPage1.Value = 2
Me.DTPicker1.Value = Date
Me.MultiPage1.Value = 1
Me.DTPicker3.Value = Date
Me.MultiPage1.Value = 0
Me.DTPicker2.Value = Date
End Sub
je suppose que l'erreur vient de ces codes puisque c'est au lancement de l'userform.
Merci à vous.