Question

在Excel表中实现自动填写日期时间，填写后就不需要自动更新；

如当A2插入数据完成后，B2显示为A2插入数据时的日期时间，B2这一单元的时间是不会自动更新的，也就是说不管过了多久，B2始终显示为A2插入数据时的日期时间。
问题已经解决，在google上找到了，代码如下：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Target.Offset(0, 1) = Now
End If
End Sub

Answer 1

操作如下：

1、以下表为例，在时间一列填入公式以满足问题条件

2、首先打开菜单栏，点击选项

3、点击公式→计算选项，勾选“启用迭代计算”，“最多迭代次数”填1

4、在E2单元格输入公式“=IF(B2="","",IF(e2="",TEXT(IF(e2>0,NOW(),""),"y:d:h:m"),e2))”，按回车

5、下拉填充公式

6、公式生效，在前面的单元格输入数据，时间列就会显示输入的日期时间

7、前面的数据修改，后面的日期不会再进行自动更新

Answer 2

1. 菜单栏，工具，选项，重新计算，勾选迭代计算，最多迭代次数设为1次。

2. 然后在E2输入=IF(B2="","",IF(e2="",TEXT(IF(e2>0,NOW(),""),"h:m"),e2))并向下填充。

3. 这样，只要在b2输入内容，B1就会永远定格显示为你在A1输入内容时的时间。

4. 无论关闭后再打开，或进行其他操作，该时间都不会变化 。

5. 注：B列先不要输入任何内容，公式写完后再输入。

   

Answer 3

选中单元格，按Ctrl+;即可输入当前日期，以后打开文件时会自己更新。

Answer 4

在B2单元格中输入"=A2"即可，就会自动随A2更新

Answer 5

使用工作表内容改变事件触发宏：
Private Sub Worksheet_Change(ByVal Target As Range)
if target.row=2 and target.column=1 then [b2]=now
End Sub

追问

如果我想设置为A列插入数据后，B列对应行都显示A列插入数据的日期时间，该怎么修改一下这个宏？谢谢！