excel - 如果 A2 和 Y2 之间的任何单元格被更改，我想在单元格 Z2 中输入今天的日期

Question

这是为了记录包含数千条记录的电子表格中记录的更改日期。感谢您提出的任何建议；我想不出用公式来做到这一点，但如果可能的话，我更喜欢它而不是宏。

谢谢你。

Answer 1

尽管您在问题中仅指定了第 2 行，但您提到了数千行，因此我假设您希望宏适用于所有行，而不仅仅是第 2 行。下面将在更改所在行的 Z 列中添加一个日期戳发生了。如果同时更改多个单元格，例如粘贴或删除操作，它也可以工作。

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

Dim cel As Range

If Not Intersect(Target, [A:Y]) Is Nothing Then
    On Error Resume Next
    Application.EnableEvents = False
    For Each cel In Target
        Range("Z" & cel.Row).Value = Date
    Next cel
    Application.EnableEvents = True
End If

End Sub

要安装，请右键单击工作表选项卡，单击 查看代码 并将上面的内容粘贴到代码窗口中。