excel - 使用 BuiltInDocumentProperties 的用户定义函数停止自动更新

Question

我成功地在您的一个答案中使用了代码，以在我的 excel 项目中显示上次保存日期。我使用的代码是:

Function LastModified() As Date

   LastModified = ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")

End Function

它像一个魅力一样工作了大约一个月。但是，从那时起，保存日期无法自动更新。我必须取消保护工作表，手动运行宏(通常我只是选择单元格并点击“ENTER”)。我不知道可能导致此问题的 excel 文件中的任何结构类型更改。有没有人对可能阻止代码运行的原因有任何想法？

Answer 1

尝试使您的功能易变:

Function LastModified() As Date
    Application.Volatile
    LastModified = ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")

End Function