Excel VBA->;上次保存日期/时间+;自动更新
我有excel文档和工作表名称:概述 因为有很多人修改这个工作簿,我想添加B1单元格用户ID(计算机名)+日期/时间(所以上次修改工作表的人以及发生这种情况时的日期和时间) 我打开宏工具(alt+F11)->我第一次使用它: 1。创建新模块并添加代码:Excel VBA->;上次保存日期/时间+;自动更新,excel,vba,Excel,Vba,我有excel文档和工作表名称:概述 因为有很多人修改这个工作簿,我想添加B1单元格用户ID(计算机名)+日期/时间(所以上次修改工作表的人以及发生这种情况时的日期和时间) 我打开宏工具(alt+F11)->我第一次使用它: 1。创建新模块并添加代码: Function LastSaveDate() Application.Volatile True LastSaveDate = FileDateTime(ThisWorkbook.FullName) End Function 2。单击
Function LastSaveDate()
Application.Volatile True
LastSaveDate = FileDateTime(ThisWorkbook.FullName)
End Function
2。单击宏的左侧内部。。。“Thisworkbook”并添加以下代码:
Function LastSaveDate()
Application.Volatile True
LastSaveDate = FileDateTime(ThisWorkbook.FullName)
End Function
我做错了,B1单元格中的excel显示“12.11.2013 18:35:14”(我在此单元格中使用:=LastSaveDate())也显示正确的日期和时间,但当我保存(作为启用的宏文档)并重新打开它时,只显示“12.11.2013 0:00:00”,而B1单元格中没有代码。您的工作簿\u Open()
宏正在用当前日期覆盖放入单元格B1中的公式:=LastSaveDate()
要防止出现这种情况,您需要删除该宏或注释掉该行:
Worksheets("Overview").Range("B1").Value = Date