OVH Cloud OVH Cloud

Lancement de macro par touche Return

3 réponses
Avatar
jcp66
Bonjour
Il y a quelque temps j'avais eu par ce forum le code pour le lancement d'une
macro en tapant return sur une cellule.
La solution avait été de mettre le code suivant dans le module de la
feuille:

"Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$F$2" Then Exit Sub
cross
End Sub"

Cela marche mais il me semble que la macro est en réalité lancée 2 fois.
Quelqu'un a t il une idée de la solution a apporter?

Merci
Cordialement
jcp

3 réponses

Avatar
gérard
salut
peut etre lorsque ta macro est terminée, sortir juste avant de F2
peut etre une piste
gerard
"jcp66" a écrit dans le message de news:
4466d8cc$0$21297$
Bonjour
Il y a quelque temps j'avais eu par ce forum le code pour le lancement
d'une macro en tapant return sur une cellule.
La solution avait été de mettre le code suivant dans le module de la
feuille:

"Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$F$2" Then Exit Sub
cross
End Sub"

Cela marche mais il me semble que la macro est en réalité lancée 2 fois.
Quelqu'un a t il une idée de la solution a apporter?

Merci
Cordialement
jcp






Avatar
Quetzalcoatl
Bonjour,

Je ne vois pas de raison pour que la procédure 'cross' soit lancée 2 fois.
Il faudrait pour cela que l'événement 'Change' de la cellule F2 se produise
2 fois.
Il faudrait donc imaginer que 'cross' modifie F2, mais seulement 1 fois,
sinon, elle serait relancée indéfiniment.

"jcp66" a écrit dans le message de news:
4466d8cc$0$21297$
Bonjour
Il y a quelque temps j'avais eu par ce forum le code pour le lancement
d'une macro en tapant return sur une cellule.
La solution avait été de mettre le code suivant dans le module de la
feuille:

"Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$F$2" Then Exit Sub
cross
End Sub"

Cela marche mais il me semble que la macro est en réalité lancée 2 fois.
Quelqu'un a t il une idée de la solution a apporter?

Merci
Cordialement
jcp






Avatar
jcp66
Oui effectivement la macro cross modifiait elle aussi la cellule F2 en la
mettant à vide.
J'ai donc fait les modifs necessaires.
Merci de votre perspicacité.
cordialement
jcp

"Quetzalcoatl" a écrit dans le message
de news: 4466e1ee$0$21283$
Bonjour,

Je ne vois pas de raison pour que la procédure 'cross' soit lancée 2 fois.
Il faudrait pour cela que l'événement 'Change' de la cellule F2 se
produise 2 fois.
Il faudrait donc imaginer que 'cross' modifie F2, mais seulement 1 fois,
sinon, elle serait relancée indéfiniment.

"jcp66" a écrit dans le message de news:
4466d8cc$0$21297$
Bonjour
Il y a quelque temps j'avais eu par ce forum le code pour le lancement
d'une macro en tapant return sur une cellule.
La solution avait été de mettre le code suivant dans le module de la
feuille:

"Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$F$2" Then Exit Sub
cross
End Sub"

Cela marche mais il me semble que la macro est en réalité lancée 2 fois.
Quelqu'un a t il une idée de la solution a apporter?

Merci
Cordialement
jcp