在excel中，如何使当前日期不随系统时间的改变而改变？

右键SHEET--查看代码
复制下列代码:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1Then
Target.Offset(0, 1) = Date
End If
End Sub
注意:在VBA代码中，Date、Now、Time分别表示系统日期、日期及时间、时间
If Target.Column = 1 Then 表示:在第1列输入后,第2列自动出现日期

你是希望当b1中有内容时就计算出结果并保存不变，目前还没有好的方法吧，只能手动。因为获取当前的时间用date函数，它是动态的。
excel中的公式默认设置自动计算，就是打开时自动重算，也可以设置为手动计算。你试试从这方面想想办法