绑定macros来优化单元格onclick？

在Excel 2000中，是否可以绑定一个vba函数来执行单元格单击鼠标时？

Answer 1

find了解决办法：

为要捕获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

你可以绑定到单元格双击。

打开VBA，转到要连接事件的工作表。在左上angular的下拉菜单中selectWorkSheet，然后右上angular的BeforeDoubleClick。检查Target.Address是否等于您关心的单元格的地址，然后调用函数希望。

像这样的东西：

 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