☰

当用户添加或更改其他列时，用当前日期填充一列

tag-icon • tag-icon microsoft-excel
当用户添加或更改其他列时，用当前日期填充一列

当用户添加或更改同一行时，我正在尝试找到一种方法来用当前日期或 TODAY() 函数填充一列（假设为 A）。

例如，如果我向 B1 添加内容或编辑 C1，A1 将填充 2/7/11。请注意，它们都在同一行上。

这在 Excel 中可行吗？如果可以，我该如何实现？

答案1

这是您正在寻找的代码：（右键单击选项卡/查看代码）。

代码将 now() 值放入单元格 Rxxx 中

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim Lijn
   Dim Cel

   Lijn = Target.Row
   Cel = "R" & Trim(Str(Lijn))
   Range(Cel).Value = Now()

End Sub

相关内容