excel - 如何制作一个excel单元格来显示今天的日期

Question

我试图像这样打印今天的日期

=DATE(2013,3,23)

但它只会打印该日期，直到某些用户更改数字。所以请帮助我！

Answer 1

=Today()

这个公式是动态的，将始终显示当前日期。

您可以这样做，或使用Date()公式，然后复制/粘贴值。

但是即使您这样做，用户仍然可以事后“更改数字”，因此除非您保护工作表或实施某种基于事件的宏来维护所需的日期，否则您无法避免这种情况。

这是一个简单的宏，无论用户对它做什么，它总是将今天的日期放在单元格 A1 中。将它放在工作表的代码模块中。

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub 'This will only trigger the event if the cell A1 changes. You can modify this as needed.

Target.Value = DateSerial(Year(Now()), Month(Now()), Day(Now()))


End Sub