如何仅在修改某个单元格时更新单元格中的日期

Question

我现在已经设置好了，所以当单元格数据发生变化时，它会更新日期。刷新工作簿时，它也会更新日期，即使我没有修改单元格内容。

我只想在修改单元格内容时更新日期。我正在从 CSV 文件中提取数据，因此我必须时不时地刷新。我该如何解决这个问题，以便它只显示真正修改单元格的日期？

我现在有一个 public 功能是这样设置的，但它不起作用。

Public Function worksheetChange(ByVal Target As Range)

If Not Application.Intersect(Target, [D4]) Is Nothing Then [L4] = Date

End Function

即使我刷新工作表并且我没有修改单元格，它仍然会更新日期，我该如何解决这个问题？

编辑：我想出了这种类型的 VBA 代码，但我不确定如何让它工作。

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Application.Intersect(Target, [D4]) Is Nothing Then
If Not ActiveWorkbook.RefreshAll Then [L4] = Date

End Sub

事后看来，此代码意味着如果应用程序不相交，则采用 D4，并且如果工作簿不刷新，则将 L4 更新为今天的日期。

谢谢。

Answer 1

参考link

Dim oldValue

Public Sub Worksheet_SelectionChange(ByVal Target As Range)
  oldValue = Target.Worksheet.Range("D4").Value
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Target.Worksheet.Range("D4")) Is Nothing Then
      If oldValue <> Target.Worksheet.Range("D4").Value Then
        Target.Worksheet.Range("L4").Value = Date
      End If
    End If
End Sub

如何仅在修改某个单元格时更新单元格中的日期

How do I update the date in a cell ONLY if a certain cell is modified

excel

vba

date

formula

excel-formula