首页 > 解决方案 > 使用 BuiltInDocumentProperties 的用户定义函数停止自动更新

问题描述

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

Function LastModified() As Date

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

End Function

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

标签: excelvba

解决方案


尝试使您的函数易变:

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

End Function

推荐阅读