Question

我无法找到此代码，我看到其他网站建议的代码页，但我记得我只使用了大约3-5行代码。

如果点击一个单元格，如果单击单元格A1，然后出现一个消息框或再次显示用户窗体，我该怎么做呢？

Answer 1

使用此（在工作表中）

'For double click
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Debug.Print "doubleclick"
End Sub

'for general changes    
Private Sub Worksheet_Change(ByVal Target As Range)
Debug.Print "change"

End Sub

'for selection changes
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Debug.Print "selection change"
End Sub

来检测。 Target表示受影响的范围，因此如果需要，可以根据需要评估的范围（例如A1）进行测试。如果要取消excel所做的标准操作（例如将光标设置在双击的单元格中），请使用Cancel = False

如果单击单元格，Excel VBA将显示msgbox

1 个答案: