在EXCEL表格中自动生成不变的日期?

来源：百度知道 编辑：UC知道 时间：2024/05/17 02:09:13
设置A1有数据时,B1自动生成当天日期(且当电脑日期变化时,再打开工作表时生成的日期还是要那天生成的日期.注:工作簿还有其它计算式,也就是工作簿计算要:自动重算.),A1无数据时,B1显示为空?

我看见有位高手用=IF(A1<>"",TODAY(),""),但再次打开工作表时,它会随电脑日期变化而变化的.
特别感谢方括号在我不会VBA情况下,经你指点,现在可以得到在A1有数据时,B1自动生成当天日期且不变.
再请帮个忙:同上,如果我要在A列中有数据时,对应的B列里自动生成当天日期且不变,在VBA代码窗口该输入些什么的代码呢?

呵呵，用函数就会引起循环引用，所以要改成手动重算。
如果用VBA就容易解决。
Alt+F11，在“工程”窗口里选择工作表，代码窗口输入下面的代码：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [a1] <> "" And [b1] = "" Then
[b1] = Date
End If
End Sub

其实,按ctrl+；来输入当天日期也挺快的

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [a1] = "" Then
[b1] = ""
elseif [b1]="" then
[b1]=date
End If
End Sub

那是当然的啊 。。
你的日期数据是来自系统的时间的啊。。。