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 : Sélectionner tout - Visualiser dans une fenêtre à part
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.