Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Difficulté avec Workbook_BeforeClose

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 !

jm.andryszak

XLDnaute Occasionnel
Bonjour
Dans un projet, j'ai besoin d'interdire l'option ANNULER dans Workbook_BeforeClose.
Ainsi je laisse le choix à l'utilisateur de sauvegarder ou non les modifications
à l'aide d'un message qui s'affiche 15 secondes.

Cependant en fermant le fichier ce message s'affiche 4 fois
ce qui n'est pas le but attendu, il ne devrait s'afficher qu'une fois.

Comment puis-je résoudre cette difficulté, je n'ai rien trouvé malgré beaucoup de recherches.
Ci-joint une extrait du fichier.
PS : J'espère avoir bien déclaré MessageBoxTimeout car je suis en WIN32
En vous remerciant par avance
 

Pièces jointes

Oups, J'ai enfin trouvé
Mauvais copier coller dans la Function MsgBoxTimer
Ensuite il faut utiliser la procédure Auto_Close pour s'affranchir de Workbook_BeforeClose
Bonne journée
Bonjour jm.andryszak,

Si je puis me permettre, tu nous dis que tu as solutionné ton problème, soit...
Mais perso, je serais particulièrement intéressé par ton code (afin de compléter mes maigres connaissances en VBA, si tu n'y voyais pas d'objection?)
Cordialement, Halffy /.
 
Bonjour
Ci-joint le fichier
PS : J'espère avoir bien déclaré l'API MessageBoxTimeout pour les 64 bits.
Chez moi ça marche mais je suis en WIN32 et je ne peux pas tester en 64 bits.
Cordialement
Re,
Merci pour le retour du code;
effectivement j'ai une "Incompatibilité de type" concernant le traitement de MsgBoxTimer /
Je vais donc essayer de régler le problème 😉
Bon dimanche à toi.
 
- 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
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…