更改事件（VBA Excel）它不'；当你需要时间戳时，你不能工作

我试图在Excel VBA中使用“工作表更改”事件，但它似乎没有按我所想的方式工作。当我在第2列中进行更改时，我试图在第4列中标记日期+时间。但是，它不起作用。此外，我正在尝试（同时）保护工作表，但它已关闭。我希望有人能给我介绍如何解决这些问题

附上活动（请让我知道我的错误）谢谢

---

“但是，它不起作用。”不是一个很好的问题描述。你的代码对我来说是有效的，但是，如果你至少给我们一些线索，说明什么对你不起作用，我们也许可以建议解决你的情况的方法。你在代码中定义时间的位置？你好。在这种情况下，我希望时间将被标记在列E中。我添加了一个带有快照或图片的链接，显示我假装在列“E”中添加标记时间的报告。但是，它不起作用。这不是一个很好的问题描述。你的代码对我来说是有效的，但是，如果你至少给我们一些线索，说明什么对你不起作用，我们也许可以建议解决你的情况的方法。你在代码中定义时间的位置？你好。在这种情况下，我希望时间将被标记在列E中。我添加了一个带有快照或图片的链接，显示我假装在列“E”中添加标记时间的报告。

Private Sub Worksheet_Change(ByVal Target As Range)
    ActiveSheet.Unprotect Password:="avalon"
        If Target.Column = 2 Then
            Application.EnableEvents = False
            Cells(Target.Row, 4).Value = Date + Time
            Application.EnableEvents = True
        End If
    ActiveSheet.Protect Password:="avalon"
End Sub