Fermeture d'Userform sauf un
Guillaume
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
Je vous écris car j'essaie de trouver une solution pour fermer tous les userform qui serait ouvert afin de n'ouvrir que l'accueil de l'application.
J'ai essayé avec :
Dim USF as Object
for each USF
If USF.name.visible = true then USF.name.hide
Next USF
UF_acceuil.show
Seulement ca ne fonctionne pas, des mon If, je sors de la boucle.
Auriez vous une solution !?
Je vous écris car j'essaie de trouver une solution pour fermer tous les userform qui serait ouvert afin de n'ouvrir que l'accueil de l'application.
J'ai essayé avec :
Dim USF as Object
for each USF
If USF.name.visible = true then USF.name.hide
Next USF
UF_acceuil.show
Seulement ca ne fonctionne pas, des mon If, je sors de la boucle.
Auriez vous une solution !?
A voir également:
- Fermeture d'Userform sauf un
- Sytadin fermeture - Télécharger - Transports & Cartes
- Forcer la fermeture d'un programme - Guide
- Annuler fermeture onglet chrome - Guide
- Frais de fermeture compte paypal - Guide
- Fruitz fermeture - Accueil - Applications & Logiciels
1 réponse
Bonjour Guillaume,
1) Ajoute ceci :
For Each USF In UserForms
2) USF.Name.hide n'est pas bon pour 2 raisons :
a) hide signifie cacher, et pour masquer un UserForm,
c'est : USF.Name.Visible = False
b) tu ne veux pas masquer un UserForm mais le fermer !
je le fais d'habitude « de l'intérieur » avec Unload.Me
Cordialement. 😊
1) Ajoute ceci :
For Each USF In UserForms
2) USF.Name.hide n'est pas bon pour 2 raisons :
a) hide signifie cacher, et pour masquer un UserForm,
c'est : USF.Name.Visible = False
b) tu ne veux pas masquer un UserForm mais le fermer !
je le fais d'habitude « de l'intérieur » avec Unload.Me
Cordialement. 😊
