检测何时在单元格中按下鼠标

Question

在指定范围内单击鼠标后，我得到了将“ X”放入空单元格的宏。我使用Sub Worksheet_SelectionChange来做到这一点，并且一切正常。现在，我想检测何时有人按住鼠标在该单元格上单击超过1s并放入单元格“ 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”