Excel 中输入数据后自动显示日期

可以用激发宏实现：

PrivateSubWorksheet_Change(ByValTargetAsRange)
IfTarget.Row=1AndTarget.Column>1AndTarget.Column<7Then
Cells(Target.Row,1)=Int(Now())
EndIf
EndSub

这个用公式是实现不了了，只能用VBA实现。但一般的人又不太喜欢更改excel的安全级别

在A1中输入公式：
=IF(COUNTA(B1:F1)=0,"",IF(A1="",NOW(),A1))
设置A列的单元格格式为日期，并选择一种你需要的日期格式。并在打开循环计算的情况下，在B1到F1中任意输入数据或文字，A1中显示当前日期，且不会改变。

想要实现excel 中输入数据后自动显示日期，有几个步骤（PS：使用2007excel演示）：

一、打开excel，在A2中输入“=IF(B2="","",IF(A2="",NOW(),A2))”。如下图：

二、点击左上角的圆圈，在点击下方的“excel选项”。如下图：

三、在弹出框中，选择“公式”，在选择“启用迭代计算”，数字不必改动。如下图：

四、之后，在B列填写数字，文案，日期就自动出现了。关闭了excel，过段时间在打开excel，也不会自动改变时间。