j'ai une macro qui prend environ 2 minutes à exécuter et je voudrais
empêcher l'utilisateur de mon application de l'arrêter en pressant sur
ESCAPE ou Ctrl Break. À tout le moins je voudrais prendre le contrôle après
un ESCAPE pour pouvoir faire une "sortie contrôlée" de la macro.
J'ai essayé avec
Application.OnKey "{ESC}", "mamacrostop"
mais l'instruction "OnKey" s'applique seulement à la fin de la macro. Durant
l'exécution de la macro la touche ESCAPE reprend son comportement habituel.
J'utilise Excel 97 et XP.
Je remercie à l'avance celui, ceux et/ou celle et celles qui pourront me
dépanner.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonsoir, Et la réponse de Papou le 2/12 à 10h29 heure de Paris ?
"=======================================================================" Bonjour Il faut utiliser la gestion d'erreur sur l'appui de la touche Echap. Pour cela il te faut commencer ta macro par : Sub TaMacro() On Error GoTo Gestion_Erreur Application.EnableCancelKey = xlErrorHandler 'Ton code ici '... Exit Sub
Gestion_Erreur: If Err = 18 Then _ 'Ta procédure pour appui sur Echap End Sub
Cordialement Pascal "========================================================================" elle ne conviens pas ? -- Amicales Salutations XL 97 / 2000 / 2002 Retirer A_S_ pour répondre en privé. Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"probsim" a écrit dans le message de news:
Bonjour,
j'ai une macro qui prend environ 2 minutes à exécuter et je voudrais empêcher l'utilisateur de mon application de l'arrêter en pressant sur ESCAPE ou Ctrl Break. À tout le moins je voudrais prendre le contrôle après un ESCAPE pour pouvoir faire une "sortie contrôlée" de la macro.
J'ai essayé avec Application.OnKey "{ESC}", "mamacrostop"
mais l'instruction "OnKey" s'applique seulement à la fin de la macro. Durant l'exécution de la macro la touche ESCAPE reprend son comportement habituel. J'utilise Excel 97 et XP.
Je remercie à l'avance celui, ceux et/ou celle et celles qui pourront me dépanner.
Guy
Bonsoir,
Et la réponse de Papou le 2/12 à 10h29 heure de Paris ?
"======================================================================="
Bonjour
Il faut utiliser la gestion d'erreur sur l'appui de la touche Echap.
Pour cela il te faut commencer ta macro par :
Sub TaMacro()
On Error GoTo Gestion_Erreur
Application.EnableCancelKey = xlErrorHandler
'Ton code ici
'...
Exit Sub
Gestion_Erreur:
If Err = 18 Then _
'Ta procédure pour appui sur Echap
End Sub
Cordialement
Pascal
"========================================================================"
elle ne conviens pas ?
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"probsim" <nospam-serciasuzanne@videotron.ca> a écrit dans le message de news:
efmrvPU2EHA.1260@TK2MSFTNGP12.phx.gbl...
Bonjour,
j'ai une macro qui prend environ 2 minutes à exécuter et je voudrais
empêcher l'utilisateur de mon application de l'arrêter en pressant sur
ESCAPE ou Ctrl Break. À tout le moins je voudrais prendre le contrôle après
un ESCAPE pour pouvoir faire une "sortie contrôlée" de la macro.
J'ai essayé avec
Application.OnKey "{ESC}", "mamacrostop"
mais l'instruction "OnKey" s'applique seulement à la fin de la macro. Durant
l'exécution de la macro la touche ESCAPE reprend son comportement habituel.
J'utilise Excel 97 et XP.
Je remercie à l'avance celui, ceux et/ou celle et celles qui pourront me
dépanner.
Bonsoir, Et la réponse de Papou le 2/12 à 10h29 heure de Paris ?
"=======================================================================" Bonjour Il faut utiliser la gestion d'erreur sur l'appui de la touche Echap. Pour cela il te faut commencer ta macro par : Sub TaMacro() On Error GoTo Gestion_Erreur Application.EnableCancelKey = xlErrorHandler 'Ton code ici '... Exit Sub
Gestion_Erreur: If Err = 18 Then _ 'Ta procédure pour appui sur Echap End Sub
Cordialement Pascal "========================================================================" elle ne conviens pas ? -- Amicales Salutations XL 97 / 2000 / 2002 Retirer A_S_ pour répondre en privé. Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"probsim" a écrit dans le message de news:
Bonjour,
j'ai une macro qui prend environ 2 minutes à exécuter et je voudrais empêcher l'utilisateur de mon application de l'arrêter en pressant sur ESCAPE ou Ctrl Break. À tout le moins je voudrais prendre le contrôle après un ESCAPE pour pouvoir faire une "sortie contrôlée" de la macro.
J'ai essayé avec Application.OnKey "{ESC}", "mamacrostop"
mais l'instruction "OnKey" s'applique seulement à la fin de la macro. Durant l'exécution de la macro la touche ESCAPE reprend son comportement habituel. J'utilise Excel 97 et XP.
Je remercie à l'avance celui, ceux et/ou celle et celles qui pourront me dépanner.
