Excel中Microsoft Word快速部分的等同function是什么？

我想在excel中的单元格中自动显示“上次保存date”。 编写VBA代码可能不可行，因为创buildExcel表格的人可能不熟悉编写VBA代码。

Answer 1

好吧，他们不必写这个代码，如果你把它打包成一个加载项，但是你必须使用macros – 没有别的办法。

Public Function LastSaveTime() As Variant Dim fs, f Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFile(ActiveWorkbook.FullName) 'you can delete the debug.print, it's just for debug ;) Debug.Print "Modified: " & f.DateLastModified LastSaveTime = f.DateLastModified End Function 

改编自Excel的帮助，寻找DateLastModified。

将其保存在模块中，然后按照“加载项”的方式进行操作。

现在，如果我没有犯任何基本的错误，这应该为任何工作簿提供一个新的工作表函数=LastSaveTime() ，它返回活动工作簿的=LastSaveTime() 。 可能有一个问题，因为activeworkbook – 使用application.caller构造时，使用这个作为加载项可能会更加节省。