Userform

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
 

Robert

XLDnaute Barbatruc
Repose en paix
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
 
L

loukiki

Guest
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
 

Hervé

XLDnaute Barbatruc
re

oui robert, ca doit etre un problème de contexte.

car je viens de tester un créant deux userform, et depuis le deuxième je teste bien la présence ou non du premier.

en tout cas ta macro est bien plus efficace.

salut
 

Discussions similaires

Réponses
15
Affichages
516
  • Résolu(e)
Microsoft 365 Taille UserForm
Réponses
3
Affichages
357

Statistiques des forums

Discussions
312 345
Messages
2 087 470
Membres
103 551
dernier inscrit
d3vi