首页 > 解决方案 > 检测鼠标何时在单元格中按下

问题描述

在指定范围内单击鼠标后,我得到了将“X”放入空单元格的宏。我曾经Sub Worksheet_SelectionChange这样做过,一切正常。现在我想检测何时有人在该单元格上单击鼠标超过 1 秒并放入单元格“Y”。有没有办法做到这一点?我可以在单击单元格时运行一些事件并在释放按钮时运行另一个事件然后计算两个事件之间的时间吗?

我的代码

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("C38:AZ49")) Is Nothing Then
            If IsEmpty(Target.Value) Then
                Target.Value = "X"
            EndIf
            Cells(Target.Row, 1).Select
    End If

如果我单击单元格->“X”
如果我按住单击> 1秒->“Y”

标签: excelvba

解决方案


推荐阅读