excel - 为什么我的更改事件代码未处理？

Question

我有一些我认为应该可以工作的更改事件代码，但是更改事件过程似乎不起作用。有人可以帮忙吗？

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim wsInput As Worksheet
    Dim rngValues As Range
    Dim lRows As Long
    Dim dateStamp As Range

    Set wsInput = Worksheet("Input AX")

    With wsInput
        lRows = .Range("J26").End(xlDown).Row
        Set rngValues = .Range("J26:P" & lRows)
        Set dateStamp = .Range("J19")

        If Not Intersect(Target, rngValues) Is Nothing Then
            dateStamp.Value = Format(Now(), "mm/dd/yyyy hh:mm:ss")
        End If
    End With

End Sub

我没有看到我的文件有任何更改，所以我什至不确定代码是否正在运行。我将值粘贴到目标范围。

标签： excelvba