Problème exécution automation userform

Bonjour,

Je vous explique mon pb :

Mon classeur contient deux Userform :
- Accueil
- Tableau_de_bord

A l'ouverture du classeur, l'accueil s'ouvre par une macro :

Private Sub Workbook_Open()
Load Accueil
Accueil.Show
End Sub

ensuite on choisi sur la page d'accueil un utilisateur (ComboBox1) puis on entre le MDP (TextBox1), si correct, ouverture du Tableau_de_bord

Private Sub TextBox1_Change()
'si le mdp entré dans TextBox1 est correct
If Me.TextBox1 = Feuil3.Range("D21").Value Then
   Load Tableau_de_bord
   Tableau_de_bord.profil = Me.ComboBox1
   Tableau_de_bord.Show
   Unload Me
End If
End Sub

une fois le tableau de bord ouvert il y a des champs de texte notamment de date où les "/" se complètent automatiquement (normalement) via la macro :

Private Sub date_debut_Change()

If Len(Me.date_debut) = 2 Then
Me.date_debut = Me.date_debut& "/"
End If

If Len(Me.date_debut) = 5 Then
Me.date_debut = Me.date_debut & "/" & Feuil3.Range("E10").Value
End If

End If

Le problème est ici !

Lorsque je rentre des données dans date_debut la macro Change ne fonctionne pas alors qu'avant que je crée le système de page d'accueil ça fonctionnait.
J'ai tenté d'ouvrir manuellement le userform Tableau_de_bord sans passer par le système de la page d'accueil et là Change fonctionne !
De + si je modifie la macro "Workbook_Open" en remplaçant le contenu par :

Load Tableau_de_bord
Tableau_de_bord.Show

ainsi, je ne passe plus par la page d'accueil en première étape, la macro date_debut_Change fonctionne !

Je pense que j'ai peut-être cassé un paramètre en bidouillant mon outil ? car ça fait plus d'un mois que je travaille dessus et cette macro fonctionnait très bien sur les 100taine de tests effectués

Savez-vous ce qu'il se passe s'il vous plait ?

Bonjour Excelleur, bonjour le forum,

La foule en délire : Le fichier ! Le Fichier !...

Rechercher des sujets similaires à "probleme execution automation userform"