<em>excel</em>在D列输入数据A列自动显示时间怎么做

=IF(COUNTA(B1:F1)=0,"",IF(A1="",TEXT(NOW(),"e-mm-dd"),A1))

Excel中可以利用if和now函数组成的公式，实现某一抄列输入数据后，另外一列自动显示当前时间的目的。

操作系统：xp；软件版本：office2007

方法如袭下：

1.先设置A列格式为时间：

2.A列中输入公式如下：

公式解释：先判断D列是否为空，如果为空，A列也为空，如果不为zd空，则A列返回当前时间

3.D列输入任意数据，A列就会显示当前时间：

右键SHEET1
复制下列代码:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 Then
Target.Offset(0, 1) = Date
End If
End Sub

注意:在VBA代码中，Date、Now、Time分别表示系统日期、日期及copy时间
If Target.Column = 7 Then 表示: 在第7列输入后,第8列自动出现日期，根据实际情况修改即可zd

用VBA实现吧，假如你百的工作表度是sheet1，那么打开VBA编辑器，在项知目管理器中选择道xheet1工作表，然后右键查专看代码，然后把下面属语句复制过去即可
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(Target.Row, 5).Value = Now()
End Sub