excel - 自动为每列添加时间戳

Question

所以我有一张工作表，每当 A10:A23 范围内的某些内容发生更改/更新时，它应该在 B 行的相应列中放置一个时间戳，但是它不起作用，我不知道为什么。

我已经将工作表代码设置为“工作表”和“更改”

这是我的代码：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row = A And Target.Column >= 10 And Target.Column <= 23 Then
        Cells(Target.Column, B) = Now()
    End If
End Sub

提前致谢！

Answer 1

假设您一次只更改一个单元格（并非总是如此）：

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("A10:A23")) Is Nothing Then
    If Target.Count = 1 Then
        Application.EnableEvents = False

            Target.Offset(0, 1) = Now()

        Application.EnableEvents = True
    End If
End If

End Sub