[VBA] - OnEntry / gerer cet evenement

Bonjour,

j'essaye de gerer le click d'une cellule avec OnEntry, je ne souhaite pas utiliser une autre fonction, pour activer une macro lorsque n'importe quelle cellule est activee dans une feuille.
dans un module (module1) j'ai entre le code, suivant afin de declarer, a l'ouverture du classeur ce qui devait arriver lorsque je clique sur une cellule:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub Auto_Open() ActiveWorkbook.Sheets("Sheet1").OnEntry = "Handle" 'u = MsgBox("INFO", vbInformation, "Handle activate") End Sub   et ensuite ecrit dans ce meme module (module1) la macro suivante Sub Handle() If Application.Caller.Column = 1 Then ThisRow = Application.Caller.Row If ThisRow = 1 Then u = MsgBox("INFO", vbInformation, "Click...") End If End If End Sub

---

Malheureusement lorsque je clique une case ma macro n'est pas appelle !!!

Quelqu'un a t'il une idee de mon erreur?

par avance merci,

Daniel.

Bonsoir,

Ca fonctionne tres bien mais ca se declenche quand on modifie une cellule pas quand on la selectionne.

Pour detecter la selection d'une cellule je crois que la seule solution est de passer par l'évènement prévu à cet effet.

Code:

---

1 2 3

Private Sub Worksheet_SelectionChange(ByVal Target As Range) MsgBox Target.Address End Sub

---

Cordialement,

Tirex28/

Citation:

---

Envoyé par daniel_gre

je ne souhaite pas utiliser une autre fonction,

---

Alors, là... J'aimerais bien savoir pourquoi.
Lorsque je tape F1 sur OnEntry dans mon vieil Excel 97, l'aide me renvoie le Change Event...
Autrement dit, cette syntaxe était déjà obsolète en 97.

A moins que tu aies encore du Excel 4 ou 5 dans ton parc, je ne vois pas bien pourquoi tu refuses d'utiliser une gestion plus moderne des événements.