Gestion de plusieurs UserForm à l'écran

Messages postés
2
Date d'inscription
jeudi 19 mai 2005
Statut
Membre
Dernière intervention
4 décembre 2007
-
Messages postés
135
Date d'inscription
vendredi 4 juin 2004
Statut
Membre
Dernière intervention
14 février 2013
-
Bonjour à tous,



<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" /??>
 




J’ai créé une macro qui affiche plusieurs UserForm qui se superposent sur l’écran. Voici une capture d’écran pour mieux comprendre :













Dans l’ordre, lorsque je lance la macro, le UserForm « Configuration » apparaît. Lorsque je clique sur le bouton « VALIDER » de ce UserForm, un deuxième UserForm (« Confirmation ! ») apparaît et vient se superposer au premier. Enfin lorsque je clique sur le bouton « OUI » de ce deuxième UserForm, j’en affiche un troisième « Exécution… » et par la même occasion j’aimerais faire disparaître les deux autres UserForm en arrière plan.



 




Voici le code que j’ai mis lorsque je clique sur le bouton « OUI » :



 






Private Sub Bouton_OUI_Click()







MyForm3.Show    ‘J’affiche le UserForm “Exécution”







MyForm1.Hide    ‘Je masque le UserForm “Configuration »







MyForm2.Hide    ‘Je masque le UserForm “Confirmation ! »







End Sub







 






Cela ne fonctionne pas. J’ai également essayé avec le code Unload MyForm à la place de MyForm.Hide mais le résultat est le même.






 






Je pense qu’il doit s’agir d’une histoire de modalité des UserForm (modale ou non modale).






 






D’avance merci pour votre aide






 






A+

4 réponses

Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
49
salut,

possible que çà soit le vbmodal oui
comment ouvres-tu tes userforms?

as-tu essayé avec un .visible=false?
Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
Messages postés
2
Date d'inscription
jeudi 19 mai 2005
Statut
Membre
Dernière intervention
4 décembre 2007

J'ouvre mes UserForm à l'aide de UserForm.Show

Les UserForms n'ont pas de propriétés "visible".
Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
49
euh....
je ne fais pas de VBA mais bizarre cette absence de propriété !!

bref, après test apparemment on peut cacher du plus près au plus loin, là çà marche :

Private Sub CommandButton1_Click()
    Me.Hide
    UserForm2.Hide
    UserForm1.Hide
    Me.Show
End Sub

++
Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
Messages postés
135
Date d'inscription
vendredi 4 juin 2004
Statut
Membre
Dernière intervention
14 février 2013

J'ai eu le même phénomène. Possible que ce soit un bug. Je n'ai pas cherché à le résoudre, désolé.

Jer