Compteur pour ouvrir un userform

[mj95]

Bonjour,


Dans un de mes userforms, lorsque je clique sur un bouton après par exemple 10 secondes, j'aimerai qu'une autre userform s'ouvre.

Le problème avec les codes que j'ai déjà utilisé c'est que si je ferme directement l'application avant de cliquer sur le bouton, la macro de l'ouverture de la seconde userform est encore active et du coup ça ne ferme pas complètement excel.

je suis obliger d'aller dans les processus du système pour fermer excel ...

 

[WUTED]

Re : Compteur pour ouvrir un userform

Bonjour mj95,

Pourrais-tu mettre ton fichier en pièce jointe?

Bonne journée,
WUTED

 

[tototiti2008]

Re : Compteur pour ouvrir un userform

Bonjour mj95,

Je suppose que tu utilises Ontime
Avec Ontime, tu peux programmer le lancement d'une macro, mais tu peux aussi annuler un lancement programmé si tu connais l'heure exacte à laquelle il a été programmé (voir l'aide sur Ontime)
à la fermeture de ton classeur il faut donc annuler ta programmation

Edit : Bonjour Wuted 🙂

 

[mj95]

Re : Compteur pour ouvrir un userform

Pour aider un peu je vous joint un fichier test

Le code qui ne va pas se trouve dans la macro du bouton copier de l'userform 2

 

[tototiti2008]

Re : Compteur pour ouvrir un userform

Re,

tu avais tout prévu, c'est bien, mais tes macros évènementielles dans ThisWorkbook ne fonctionnent pas
elles ne doivent pas s'écrire

Sub ThisWorkbook_beforeclose()

Sub ThisWorkbook_open()

mais

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Private Sub Workbook_Open()

utilises les listes déroulantes en haut de l'éditeur VBA, choisis Workbook dans celle de gauche et Open dans celle de droite, il t'écrira ça comme il faut tout seul

 

[mj95]

Re : Compteur pour ouvrir un userform

ok mais pour mon problème d'ouverture si je change juste mon workbook_beforeclose , ça va m'arreter le timer ?
En plus, je viens de regarder mais je n'avais pas rentrer mon module "supprimeinterrruption" dans workbook_beforeclose c'est peut être pour ça que je n'avais pas le résultat attendu