Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Arrêt de macro en cours d'exécution

7 réponses
Avatar
Vincent.
Bonjour =E0 tous et =E0 toutes :)
Est-ce que quelqu'un pourrait m'aider =E0 me sortir d'un=20
bourbier ?
En fait, j'aimerai que pendant l'ex=E9cution d'une de mes=20
macros qui est un peu longue, un userform propose =E0=20
l'utilisateur d'arr=EAter la macro en cours d'ex=E9cution. Ca=20
doit bien =EAtre possible, mais je m'en sors plus !
Merci d'avance !

V.

7 réponses

Avatar
Rai
Vincent. wrote:
Bonjour à tous et à toutes :)
Est-ce que quelqu'un pourrait m'aider à me sortir d'un
bourbier ?
En fait, j'aimerai que pendant l'exécution d'une de mes
macros qui est un peu longue, un userform propose à
l'utilisateur d'arrêter la macro en cours d'exécution. Ca
doit bien être possible, mais je m'en sors plus !
Merci d'avance !

V.


Bonjour,

une solution à adapter et à insérer dans ta procédure à l'endroit souhaité :

reponse = MsgBox("Voulez-vous arrêter ?", vbYesNo + vbQuestion, "Fin de la macro")
If reponse = vbYes Then
Exit Sub
End If



--
Cordialement,

Rai
Remplacer point par la ponctuation appropriée pour répondre...

Avatar
Vincent.
Merci...
mais j'aimerai pouvoir l'arrêter à tout moment et non pas
à certains moments. Et que par défaut la macro puisse
aller toute seule jusqu'au bout, sans avoir à valider
régulièrement (ce que suppose ta méthode) !

-----Message d'origine-----
Vincent. wrote:
Bonjour à tous et à toutes :)
Est-ce que quelqu'un pourrait m'aider à me sortir d'un
bourbier ?
En fait, j'aimerai que pendant l'exécution d'une de mes
macros qui est un peu longue, un userform propose à
l'utilisateur d'arrêter la macro en cours d'exécution.
Ca


doit bien être possible, mais je m'en sors plus !
Merci d'avance !

V.


Bonjour,

une solution à adapter et à insérer dans ta procédure à
l'endroit souhaité :


reponse = MsgBox("Voulez-vous arrêter ?", vbYesNo +
vbQuestion, "Fin de la macro")

If reponse = vbYes Then
Exit Sub
End If



--
Cordialement,

Rai
Remplacer point par la ponctuation appropriée pour
répondre...

.




Avatar
papou
Bonjour Vincent
Le plus simple : Ctrl + Pause
Cordialement
Pascal

"Vincent." a écrit dans le message de
news: 1c3b401c421fb$e7f35b90$
Bonjour à tous et à toutes :)
Est-ce que quelqu'un pourrait m'aider à me sortir d'un
bourbier ?
En fait, j'aimerai que pendant l'exécution d'une de mes
macros qui est un peu longue, un userform propose à
l'utilisateur d'arrêter la macro en cours d'exécution. Ca
doit bien être possible, mais je m'en sors plus !
Merci d'avance !

V.
Avatar
Vincent.
Pardon... me suis mal exprimé !
C'est au niveau de l'utilisateur final que je voudrais ça
(avec gestion de sortie de macro en cours...)
Pour moi, le Ctrl Pause me suffiraittrès bien, pour
l'utilisateur lambda, j'ose même pas y penser !!!
Peut-être est-ce impossible ?

-----Message d'origine-----
Bonjour Vincent
Le plus simple : Ctrl + Pause
Cordialement
Pascal

"Vincent." a écrit
dans le message de

news: 1c3b401c421fb$e7f35b90$
Bonjour à tous et à toutes :)
Est-ce que quelqu'un pourrait m'aider à me sortir d'un
bourbier ?
En fait, j'aimerai que pendant l'exécution d'une de mes
macros qui est un peu longue, un userform propose à
l'utilisateur d'arrêter la macro en cours d'exécution. Ca
doit bien être possible, mais je m'en sors plus !
Merci d'avance !

V.


.



Avatar
Nicolas B.
Salut,

Tu peux avertir l'utilisateur (qui n'y connaît peut-être rien aux macros) de
l'existence de raccourci, on peut afficher une UserForm indiquant 'Vous
pouvez stopper en faisant...' :

userform.show vbmodeless
userform.repaint
'big calcul
userform.hide


Bien que la userform s'affiche au premier plan lors des calculs, il n'est
apparemment pas possible de cliquer sur un bouton qu'on y aurait ajouté pour
arrêter la macro.


A+
--
Nicolas B.


Pardon... me suis mal exprimé !
C'est au niveau de l'utilisateur final que je voudrais ça
(avec gestion de sortie de macro en cours...)
Pour moi, le Ctrl Pause me suffiraittrès bien, pour
l'utilisateur lambda, j'ose même pas y penser !!!
Peut-être est-ce impossible ?

-----Message d'origine-----
Bonjour Vincent
Le plus simple : Ctrl + Pause
Cordialement
Pascal

"Vincent." a écrit dans le
message de news: 1c3b401c421fb$e7f35b90$
Bonjour à tous et à toutes :)
Est-ce que quelqu'un pourrait m'aider à me sortir d'un
bourbier ?
En fait, j'aimerai que pendant l'exécution d'une de mes
macros qui est un peu longue, un userform propose à
l'utilisateur d'arrêter la macro en cours d'exécution. Ca
doit bien être possible, mais je m'en sors plus !
Merci d'avance !

V.


.




Avatar
papou
Re
Dans ces conditions, il te faudrait quelque chose dans ce style :
Dans ta macro "principale" (ici déclenchée par CTRL +):
Application.OnKey "^{+}", "Arreter"
Dans une autre macro :
Sub Arreter()
End
End Sub

Cordialement
Pascal

"Vincent." a écrit dans le message de
news: 1c42901c42206$ad519690$
Pardon... me suis mal exprimé !
C'est au niveau de l'utilisateur final que je voudrais ça
(avec gestion de sortie de macro en cours...)
Pour moi, le Ctrl Pause me suffiraittrès bien, pour
l'utilisateur lambda, j'ose même pas y penser !!!
Peut-être est-ce impossible ?

-----Message d'origine-----
Bonjour Vincent
Le plus simple : Ctrl + Pause
Cordialement
Pascal

"Vincent." a écrit
dans le message de

news: 1c3b401c421fb$e7f35b90$
Bonjour à tous et à toutes :)
Est-ce que quelqu'un pourrait m'aider à me sortir d'un
bourbier ?
En fait, j'aimerai que pendant l'exécution d'une de mes
macros qui est un peu longue, un userform propose à
l'utilisateur d'arrêter la macro en cours d'exécution. Ca
doit bien être possible, mais je m'en sors plus !
Merci d'avance !

V.


.



Avatar
Vincent.
Argh !
Merci beaucoup... je vais gérer par raccourci alors !

Bien que la userform s'affiche au premier plan lors des
calculs, il n'est

apparemment pas possible de cliquer sur un bouton qu'on y
aurait ajouté pour

arrêter la macro.