Sortie de boucle par évennement

  • Initiateur de la discussion Initiateur de la discussion VIARD
  • Date de début Date de début

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 !

VIARD

XLDnaute Impliqué
Bonjour à toutes et tous

C'est un vieux problème que j'essaie de résoudre.
Un Père Noël va t-il m'offrir ce cadeau !
J'ai une boucle dans laquelle j'ai placé un évennement
un bouton pour arrêter cette boucle. mais ça ne marche pas.
ou est la solution.
ci-joint un fichier exemple

Salutation à tous
Jean-Paul
 

Pièces jointes

Re : Sortie de boucle par évennement

Softmama merci

j'ai effectué un test, la boucle se comporte mieux, mais ça ne marche pas.
par exemple je boucle 20 fois, donc 20 secondes, si je stop à 10, j'ai bien 10 à l'affichage,
mais le test ne rend pas la main avant 20 seconde.
pour une boucle de 200 même problème.

encore merci de tes efforts

Jean-Paul
 
Re : Sortie de boucle par évennement

Re VIARD, Bjour kjin,

Si tu places un DoEvents dans ta boucle While.... Wend, je ne constate pas de pb. Ou sinon, remplace ta boucle Qui 'attend' une seconde par un Application.Ontime correspondant, comme te l'a suggéré kjin, ce qui permet de l'annuler par le bouton stop facilement.
 
Re : Sortie de boucle par évennement

Merci Kjin, Softmama

J'ai effectué le test avec Doevents placé dans la boucle de tempo
ça fonctionne super bien.
Maintenant je sais que le Père Noël existe.
Je vais pouvoir valider mon petit programme.

Encore merci et bon réveillon de nouvel an.

salutation de la bretagne
Jean-Paul
 
- 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

Discussions similaires

Réponses
6
Affichages
568
Réponses
16
Affichages
1 K
  • Question Question
Microsoft 365 Code listbox
Réponses
4
Affichages
668
Réponses
4
Affichages
461
Retour