作者：乔山办公网日期：
返回目录：excel表格制作
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If ThisWorkbook.Saved = False Then
[A1] = Now()
[A2] = Now()
Range("A1").Select
Selection.NumberFormatLocal = "h:mm;@"
Range("A2").Select
Selection.NumberFormatLocal = "yyyy/m/d"
End If
End Sub
可以百实度现，希问望答能帮到版你~权
1、找到并打开需要修改的文档。
2、关闭电脑网络。
3、修改电脑系统时间。
4、创建一个空白文档。
5、将原来的文档复制粘贴进去，然后再次修改电脑时间，并保存文档。
6、更新电脑时间，打开网络，进入时间设置。
1、通常加入系统时间是在单元格内输入=NOW()函数，系统自动生成当前时间。这样做如果该工作来表中任意一个单元格数据发生变化，所有使用=NOW()生成时间的单元格都会跟随全部变化。
2、为了实现时间不跟随表格内容改变而改变，达到固定时间目的，通过使用数据有效性来实现。
3、在任意单源元格插入=NOW()函数，如实验表格中D1列
。
4、单击【数据】选项卡，选择知【数据有效性】选项，弹出数据有效性设置窗口。
5、设置有效性条件为“序列” ，数据来源设置为步骤2中的D1列，将引用改为绝对引用，即"=$D$1"，点击确定保道存。
6、在A3、A4、A5单元格输入内容测试，会发现，B3、B4、B5时间不会随着单元格变化而变化。但直接使用NOW()函数的A1、A2单元格却会跟随着进行变化。
工具>选项，选择重新计算标签，将“手动重算（保存前自动重算）”，改为“自动重算”，（也就是选种“自动重算”前面的单选框）。