Click de souris déclenchant une macro

[thomas]

Bonjour le forum, et bon Week-end!

Est-il possible de lancer une macro en cliquant sur une cellule?

Merci d'avance pour vos réponses !

 

[steplof]

Salut à tous,
Ravi de voir que Database est de retour (oui je sais j'arrive après la bataille mais quand même... désolé thomas d'utiliser un peu ton post pour passer des msg)

Concernant ton problème c'est possible

avec un clic droit en utilisant l'évenement
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If target.address="$A$1" then macro1
End Sub

et en définissant les cellules qui doivent déclencher: dans l'exemple macro1 sera éxécutée après un clic droit sur A1

c'est possible aussi avec un double clic.

Pour le simple clic, je suis pas sur que Excel (tout seul) fasse la différence entre un simple clic et une sélection de cellule par le clavier ... mais c'est peut etre par ignorance.

Tu peux aussi affecter ta macro à la sélection d'une cellule précise.

En espérant t'avoir un peu aidé et à ta disposition pour développer.

@ bientôt
Steplof

 

[thomas]

Re le forum et bon @pp,

Merci Steplof pour ton post ! Je vais tester !
Qu'est ce que tu entends par "Tu peux aussi affecter ta macro à la sélection d'une cellule précise." ?

@+

 

[steplof]

Salut Thomas,


ce que je veux dire c'est que tu peux déclencher une macro par sélection de la cellule (que ce soit en y cliquant dessus, ou en la sélectionnant par les flèches du clavier ,le bouton entrée, ou tout autre moyen même si je n'en vois pas...)


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then Macro1
End Sub


Avec cette macro, chaque fois que ta cellule A1 est sélectionnée, ta macro1 sera exécutée.

Voilà
Bonne Aprem
Steplof

 

[thomas]

Oki merci, ca marche effectivement

Merci pour ton aide.