Lier la macro pour exceler la cellule onclick?

Question

En Excel 2000, est-il possible de lier une fonction vba à exécuter lorsqu'une cellule est cliquée avec la souris?

Answer 1

trouvé une solution:

Faire une plage nommée pour les cellules que vous voulez capturer clickevent

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
    Application.EnableEvents = False 
    Application.ActiveSheet.Cells(1, 1).Value = Target.Address 
    If Not Intersect(Target, Range("MyNamedRange")) Is Nothing Then 
     ' do your stuff 
     Range("A1").Select 
    Endif 
    Application.EnableEvents = True 
End Sub 

Answer 2

Vous pouvez lier à une cellule en double-cliquant.

Ouvrir VBA, GOTO la feuille de calcul que vous voulez câbler l'événement Sélectionnez WorkSheet dans le menu déroulant en haut à gauche et BeforeDoubleClick en haut à droite Le cocher la Target.Address est égale à l'adresse de la cellule que vous aimez à propos de et appelez la fonction que vous souhaitez.

Quelque chose comme ceci:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
    If Target.Address(True, True, xlA1) = "$A$1" Then 
     Call MyDemo 
    End If 
End Sub 

Private Sub MyDemo() 
    MsgBox "Hello" 
End Sub