Bonjour à tous du forum,
J'utilise un Userform avec un format pour les Textbox :
J'ai mis le code suivant :
Private Sub UserForm_Initialize()
TextBox1.Value = Worksheets("data").Range("E1").Value + 1
TextBox1 = Format(Me.TextBox1, "# ##0") 'BUG
Textbox2 = Format(Me.Textbox2, "dd/mm/yyyy") 'BUG
...
End Sub
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Me.Textbox2 = Format(Me.Textbox2, "dd/mm/yyyy") 'BUG
End Sub
En démarrant la macro, je reçois les deux messages suivants :
"Erreur de compilation, tableau attendu" et "Erreur de compilation, projet introuvable". 😕
J'ai recherché avec fontion F1 d'Aide, mais rien trouvé.
Comment résoudre?
merci d'avance d'astuces,
news
J'utilise un Userform avec un format pour les Textbox :
J'ai mis le code suivant :
Private Sub UserForm_Initialize()
TextBox1.Value = Worksheets("data").Range("E1").Value + 1
TextBox1 = Format(Me.TextBox1, "# ##0") 'BUG
Textbox2 = Format(Me.Textbox2, "dd/mm/yyyy") 'BUG
...
End Sub
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Me.Textbox2 = Format(Me.Textbox2, "dd/mm/yyyy") 'BUG
End Sub
En démarrant la macro, je reçois les deux messages suivants :
"Erreur de compilation, tableau attendu" et "Erreur de compilation, projet introuvable". 😕
J'ai recherché avec fontion F1 d'Aide, mais rien trouvé.
Comment résoudre?
merci d'avance d'astuces,
news
Dernière édition: