如何在EXCEL中显示EXCEL被修改并且被保存的时间和日期?

2025年03月12日 20:47
有2个网友回答
网友(1):

按下alt+F11
你试试看。thisworkbook中的如下代码:
Public flag As Boolean
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If flag = True Then
Sheet1.[a1] = Format(FileDateTime(ThisWorkbook.FullName), "HH:MM:SS")
Sheet1.[a2] = Format(FileDateTime(ThisWorkbook.FullName), "YYYY-MM-DD")

End If
End Sub

Private Sub Workbook_Open()
flag = False
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
flag = True
End Sub

网友(2):

简单有效的方法如下:
将电脑的日期时间改为需要修改excel文件最后访问的时间;
打开excel文件,随便输入文字,然后删除,点击保存;
此时excel文件最后访问时间就变更了。