Question

excel 中如何获取 上次的保存或修改或访问 时间

我想在Sheet1里[A1]得到上次的时间，[B1]是当前的时间，[C1]是两时间的差

我现在只知道
[B1]使用 NOW()
[C1]使用 SUM(B1-A1)

但不知[A1]使用什么，或使用什么代码？向高手请教~~

Answer 1

按下ALT+F11,进入VBA编辑界面.双击左边的纵栏下的"THISWORKBOOK",将下面代码复制到右边的编辑框中.退出.以后每次你打开文件,即会达到你所说的要求

Private Sub Workbook_Open()
Sheets("SHEET1").Activate
Range("A1:B1").Select
Selection.NumberFormat = "YYYY-MM-DD HH:MM:SS"
Cells(1, 1) = ActiveWorkbook.BuiltinDocumentProperties(12)
Cells(1, 2) = Now()
Cells(1, 3) = WorksheetFunction.Text(Cells(1, 2) - Cells(1, 1), "D天H小时M分钟S秒")
End Sub

Answer 2

用这个宏试试吧：

Public Sub last_save_time()
    Range("a1").Value = ActiveWorkbook.BuiltinDocumentProperties(12).Value
End Sub

自己试出来的，这个是返回最后一次保存时间

Answer 3

Private Sub Worksheet_Change(ByVal Target As Range)
    Static t$
    Application.EnableEvents = False
    If t <> "" Then [a1] = t
    t = [b1].Text
    Application.EnableEvents = True
End Sub

Answer 4

A1用手工输入吧:
按ctrl+; (ctrl加分号)
回车

Answer 5

Private Sub Workbook_Open()
Sheets("SHEET1").Activate
Range("A1:B1").Select
Selection.NumberFormat = "YYYY-MM-DD HH:MM:SS"
Cells(1, 1) = ActiveWorkbook.BuiltinDocumentProperties(12)
Cells(1, 2) = Now()
Cells(1, 3) = WorksheetFunction.Text(Cells(1, 2) - Cells(1, 1), "D天H小时M分钟S秒")
End Sub