"Patrice FY" a écrit dans le message de news: 099301c534f5$11b6ed40$
Bonjour,
J'execute un macro qui est assez longue, comment faire si necessaire sur appuie de la touche "echap" par exemple pour interrompre la macro. Merci
anonymousA
bonjour,
en complément de ChrisV
p.e
mettre en début de macro
On Error GoTo errhandler
Application.EnableCancelKey = xlErrorHandler
'ici le code que tu veux exécuter'
'et en fin de programme, l'étiquette
errhandler: If Err = 18 Then MsgBox "Vous avez annulé"
ce faisant ,en appuyant sur la touche ESC, le programme s'interrompra.
pour autant, ce qui était en cours d'exécution n'est pas terminé poprement sauf si tu le geres dans ton errhandler, je veux parler d'eventuels fichiers ouverts, de remise à zéro de feuille, de destruction d'objets , etc.. Par ailleurs, ca oblige à avoir la quasi certitude que ton code fonctionne dans toutes les configurations possibles ou alors de mettre une autre condition en Else pour afficher quand même l'erreur qui s'est produite et sa description.
A+
Bonjour,
J'execute un macro qui est assez longue, comment faire si necessaire sur appuie de la touche "echap" par exemple pour interrompre la macro. Merci
bonjour,
en complément de ChrisV
p.e
mettre en début de macro
On Error GoTo errhandler
Application.EnableCancelKey = xlErrorHandler
'ici le code que tu veux exécuter'
'et en fin de programme, l'étiquette
errhandler:
If Err = 18 Then MsgBox "Vous avez annulé"
ce faisant ,en appuyant sur la touche ESC, le programme s'interrompra.
pour autant, ce qui était en cours d'exécution n'est pas terminé
poprement sauf si tu le geres dans ton errhandler, je veux parler
d'eventuels fichiers ouverts, de remise à zéro de feuille, de
destruction d'objets , etc..
Par ailleurs, ca oblige à avoir la quasi certitude que ton code
fonctionne dans toutes les configurations possibles ou alors de mettre
une autre condition en Else pour afficher quand même l'erreur qui s'est
produite et sa description.
A+
Bonjour,
J'execute un macro qui est assez longue, comment faire si
necessaire sur appuie de la touche "echap" par exemple
pour interrompre la macro.
Merci
errhandler: If Err = 18 Then MsgBox "Vous avez annulé"
ce faisant ,en appuyant sur la touche ESC, le programme s'interrompra.
pour autant, ce qui était en cours d'exécution n'est pas terminé poprement sauf si tu le geres dans ton errhandler, je veux parler d'eventuels fichiers ouverts, de remise à zéro de feuille, de destruction d'objets , etc.. Par ailleurs, ca oblige à avoir la quasi certitude que ton code fonctionne dans toutes les configurations possibles ou alors de mettre une autre condition en Else pour afficher quand même l'erreur qui s'est produite et sa description.
A+
Bonjour,
J'execute un macro qui est assez longue, comment faire si necessaire sur appuie de la touche "echap" par exemple pour interrompre la macro. Merci
