2009-09-24 151 views

回答

4

找到了解決辦法:

將名爲範圍內要捕獲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 
4

您可以綁定到單元格雙擊。

打開VBA,後藤要連線了事件 選擇工作表中的下拉在右上角 的檢查Target.Address左上角和BeforeDoubleClick工作表等於你關心的單元格地址關於並調用你想要的功能。

事情是這樣的:

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 
+0

雙擊單元格是我不夠好。很好的答案。 beforeX函數是否可以取消默認的事件處理? – Cheekysoft 2009-09-24 14:14:13

+0

我這麼認爲。設置取消爲真我相信 - 但從未嘗試過! – JDunkerley 2009-09-24 14:30:56

+0

呵呵。打我30秒。剛剛在http://msdn.microsoft.com/en-us/library/aa220840%28office.11​​%29.aspx中找到。取消=真正有效。 – Cheekysoft 2009-09-24 14:34:20

相關問題