OVH Cloud OVH Cloud

Activer une macro à la sortie d'une cellule

4 réponses
Avatar
Luc Bourgeois
Bonjour,

Je souhaite activer la macro nommé test lorsque je quitte la cellule A1
Pouvez-vous m'aider?

4 réponses

Avatar
Patrick Penet
Met cette sub dans le module de code de ta feuille :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
test
End Sub

Cordialement.
PP

"Luc Bourgeois" a écrit dans le message de news:

Bonjour,

Je souhaite activer la macro nommé test lorsque je quitte la cellule A1
Pouvez-vous m'aider?


Avatar
Luc Bourgeois
Bonjour Patrick,

Merci pour ta réponse. Le prôblème que je rencontre dans cette VBA c'est que
la macro s'exécute lorsque je quite n'importe quel cellule de la feuille. Je
souhaiterai que la macro s'execute dès que la valeur de la cellule A1 est
modifiée.
Merci pour ton aide



Met cette sub dans le module de code de ta feuille :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
test
End Sub

Cordialement.
PP

"Luc Bourgeois" a écrit dans le message de news:

Bonjour,

Je souhaite activer la macro nommé test lorsque je quitte la cellule A1
Pouvez-vous m'aider?







Avatar
Pierre Fauconnier
Bonjour

Ce que tu demandes ici n'est pas la même chose que ce que tu demandais dans
ton premier message.

Ici, tu demandes une macro qui s'active lorsque A1 est MODIFIEE, alors que
tout à l'heure tu demandais une macro lorsque TU QUIITAIS A1... Nuance !!

Pour ce que tu demandes présentement, il faut gérer l'évènement Change de la
feuille concernée. Excel passe à la macro évènementielle un argument de type
RANGE, qu'il faut tester pour savoir si c'est la cellule A1 qui a été
modifiée.

private sub worksheet_change(Byval target as range)
if target.address = "$A$1" then
...
endif
end sub

à mettre dans le code de ta feuille, permettra de réaliser cela.

A toi de tester cela et d'adapter

Ok?

--
Pierre Fauconnier () (Skype:
pierre_fauconnier)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"Luc Bourgeois" a écrit dans le
message de news:
Bonjour Patrick,

Merci pour ta réponse. Le prôblème que je rencontre dans cette VBA c'est
que
la macro s'exécute lorsque je quite n'importe quel cellule de la feuille.
Je
souhaiterai que la macro s'execute dès que la valeur de la cellule A1 est
modifiée.
Merci pour ton aide



Met cette sub dans le module de code de ta feuille :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
test
End Sub

Cordialement.
PP

"Luc Bourgeois" a écrit dans le
message de news:

Bonjour,

Je souhaite activer la macro nommé test lorsque je quitte la cellule A1
Pouvez-vous m'aider?









Avatar
patrick
Bonjour,

tu testes l' adresse de la cellule
il faut choisir le bon evenement
Worksheet_Change
ou
Worksheet_SelectionChange

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address = "$A$1" Then
MsgBox Target.Address

End If
Application.EnableEvents = True

End Sub



Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.EnableEvents = False
If Target.Address = "$A$1" Then
MsgBox Target.Address

End If
Application.EnableEvents = True
End Sub


à+
patrick


"Luc Bourgeois" a écrit dans le
message news:
Bonjour Patrick,

Merci pour ta réponse. Le prôblème que je rencontre dans cette VBA c'est
que

la macro s'exécute lorsque je quite n'importe quel cellule de la feuille.
Je

souhaiterai que la macro s'execute dès que la valeur de la cellule A1 est
modifiée.
Merci pour ton aide



Met cette sub dans le module de code de ta feuille :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
test
End Sub

Cordialement.
PP

"Luc Bourgeois" a écrit dans le
message de news:



Bonjour,

Je souhaite activer la macro nommé test lorsque je quitte la cellule
A1



Pouvez-vous m'aider?