• Initiateur de la discussion Initiateur de la discussion loukiki
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

L

loukiki

Guest
Bonjour à tous

Dans un code, je veux établir une condition sur l'affichage d'une UserForm.

Si Userform affichée alors

Comment l'écrire ?
Merci
Eric
 
Bonsoir Loukiki, Hervé, bonsoir le forum,

J'ai testé ton code Hervé mais ça ne marchait pas. Peut-être n'étais-je pas dans le bon contexxte. Je porpose donc celui-ci qui teste si l'Userform nommé UserForm1 est affiché Show (ou chargé Load qui marche aussi).


For x = 0 To UserForms.Count - 1
If UserForms(x).Name = 'UserForm1' Then
'ton code
End If
Next x
 
OK Herve, je détaille :

A l'ouverture de mon application, j'ai un userform 'Login' qui s'ouvre par défaut.
L'utilisateur à le choix
- entrer un login (pseudo et mot de passe), ou
- annuler

Dans ce cas, Annuler ferme l'application excel sans sauvegarder.

Après le login, l'utilisateur jongle entre differentes boites de dialogue, sur lesquelle on peut à tout moment changer de login au profit d'un autre utilisateur.

Pour ce faire, le meme UserForm 'Login' s'ouvre.
Cependant, la touche Annuler ne doit pas fermer l'application, mais seulement l'userform 'Login'. Ainsi, si l'utilisateur connecté veut poursuivre après affichage de l'userform 'Login', il n'a qu'à faire Annuler pour interrompre le changement d'utilisateur.

Donc, je souhaite faire un test sur la demande Annuler

si un Userform1 est ouvert alors
fermer userform Login
Sinon
fermer excel


Merci pour ton aide
Eric
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
175
Réponses
2
Affichages
110
Réponses
2
Affichages
184
Retour