OVH Cloud OVH Cloud

Arrêt d'une macro par un utilisateur impatient

9 réponses
Avatar
garnote
Rebonjour,

Comment faire, déjà, pour intervenir quand un utilisateur
fesse sur la touche Échap pendant l'exécution d'une macro ?

Serge

9 réponses

Avatar
AV
Sub tamacro()
Application.EnableCancelKey = xlDisabled
-------
end sub

AV
Avatar
garnote
Ce n'est pas ce que je recherche. Si l'utilisateur tape sur Échap
je voudrais changer la valeur d'une cellule et stopper la macro
sans message d'Excel.

Serge

"AV" a écrit dans le message de news:

Sub tamacro()
Application.EnableCancelKey = xlDisabled
-------
end sub

AV




Avatar
isabelle
salut Serge,

On Error GoTo zaza
Application.EnableCancelKey = xlErrorHandler
'ta macro
zaza:
If Err = 18 Then
MsgBox "vous avez cancellé"
Range("A1") = "zaza"
Exit Sub
End If

isabelle


Ce n'est pas ce que je recherche. Si l'utilisateur tape sur Échap
je voudrais changer la valeur d'une cellule et stopper la macro
sans message d'Excel.

Serge

"AV" a écrit dans le message de news:

Sub tamacro()
Application.EnableCancelKey = xlDisabled
-------
end sub

AV






Avatar
garnote
Bonjour Isabelle,

Ça fonctionne, mais pas toujours ! Il y a comme un conflit
entre cette macro et une autre macro de feuille !
Si tu veux y jeter un oeil, je peux t'envoyer mon classeur.

Serge



"isabelle" a écrit dans le message de news:

salut Serge,

On Error GoTo zaza
Application.EnableCancelKey = xlErrorHandler
'ta macro
zaza:
If Err = 18 Then
MsgBox "vous avez cancellé"
Range("A1") = "zaza"
Exit Sub
End If

isabelle


Ce n'est pas ce que je recherche. Si l'utilisateur tape sur Échap
je voudrais changer la valeur d'une cellule et stopper la macro
sans message d'Excel.

Serge

"AV" a écrit dans le message de news:

Sub tamacro()
Application.EnableCancelKey = xlDisabled
-------
end sub

AV








Avatar
garnote
J'ai trouvé une parade et cessé de m'interroger
sur l'origine du conflit macro !

;-)))

Serge

"garnote" a écrit dans le message de news:
4E5yb.71216$
Bonjour Isabelle,

Ça fonctionne, mais pas toujours ! Il y a comme un conflit
entre cette macro et une autre macro de feuille !
Si tu veux y jeter un oeil, je peux t'envoyer mon classeur.

Serge



"isabelle" a écrit dans le message de news:

salut Serge,

On Error GoTo zaza
Application.EnableCancelKey = xlErrorHandler
'ta macro
zaza:
If Err = 18 Then
MsgBox "vous avez cancellé"
Range("A1") = "zaza"
Exit Sub
End If

isabelle


Ce n'est pas ce que je recherche. Si l'utilisateur tape sur Échap
je voudrais changer la valeur d'une cellule et stopper la macro
sans message d'Excel.

Serge

"AV" a écrit dans le message de news:

Sub tamacro()
Application.EnableCancelKey = xlDisabled
-------
end sub

AV












Avatar
isabelle
:-)) alors tout est au beau fixe, à l'intérieur bien sur, parce qu'à
l'extérieur on voie très bien mère nature qui se démène.

isabelle


J'ai trouvé une parade et cessé de m'interroger
sur l'origine du conflit macro !

;-)))

Serge

"garnote" a écrit dans le message de news:
4E5yb.71216$
Bonjour Isabelle,

Ça fonctionne, mais pas toujours ! Il y a comme un conflit
entre cette macro et une autre macro de feuille !
Si tu veux y jeter un oeil, je peux t'envoyer mon classeur.

Serge



"isabelle" a écrit dans le message de news:

salut Serge,

On Error GoTo zaza
Application.EnableCancelKey = xlErrorHandler
'ta macro
zaza:
If Err = 18 Then
MsgBox "vous avez cancellé"
Range("A1") = "zaza"
Exit Sub
End If

isabelle


Ce n'est pas ce que je recherche. Si l'utilisateur tape sur Échap
je voudrais changer la valeur d'une cellule et stopper la macro
sans message d'Excel.

Serge

"AV" a écrit dans le message de news:

Sub tamacro()
Application.EnableCancelKey = xlDisabled
-------
end sub

AV














Avatar
AV
Ce n'est pas ce que je recherche.


Ben si tu dis pas tout ...
Un petit coup de F1 sur "EnableCancelKey" ça peut donner la réponse..;-)

AV

Avatar
garnote
Et en plus c'est rapide, une F1 ;-)

Serge

"AV" a écrit dans le message de news:

Ce n'est pas ce que je recherche.


Ben si tu dis pas tout ...
Un petit coup de F1 sur "EnableCancelKey" ça peut donner la réponse..;-)

AV






Avatar
Clément Marcotte
Et en plus c'est rapide, une F1 ;-)



Quand c'est pas une BAR