Fermeture auto userform [VBA]

Résolu/Fermé
Gornarf Messages postés 122 Date d'inscription vendredi 19 février 2010 Statut Membre Dernière intervention 15 mai 2014 - Modifié par Gornarf le 22/08/2011 à 11:06
Gornarf Messages postés 122 Date d'inscription vendredi 19 février 2010 Statut Membre Dernière intervention 15 mai 2014 - 22 août 2011 à 11:06
Bonjour,

J'ai une fois de plus soucis d'USF avec VBA,

J'ai deux USF

USF1 et USF2

J'ai un bouton de commande pour quitter USF1

Lorsqu'il quitte, USF2 s'affiche.

J'aimerai qu'après 3 secondes USF2 se ferme tout seul.

J'utilise ce code:

Private Sub UserForm_Activate()

Application.Wait Now + TimeValue("00:00:03") '3 secondes

ThisWorkbook.Saved = True
Application.Quit

End Sub


Ça marche mais le problème c'est que les évènements se déroulent au lancement de l'USF1 donc mon "programme" est inutilisable.

Comment faire en sorte que ça ne s'applique qu'a l'USF2?

Merci d'avance


Gornarf
A voir également:

1 réponse

Gornarf Messages postés 122 Date d'inscription vendredi 19 février 2010 Statut Membre Dernière intervention 15 mai 2014 3
22 août 2011 à 11:06
J'ai la solution et c'est tout bête....

Fallait que je mette le code dans le USF2... J'y avais pas pensé. Désolé du dérangement. Pour le coup c'était un peut bêbête.


Si un Admin pouvais passer en résolu... merci ;-)
0