什么是Excel

Question

一个Microsoft Word快速部分的同等功能我想显示“上次保存日期”会自动在Excel单元格。编写VBA代码可能不可行，因为创建Excel表格的人可能不熟悉编写VBA代码。

Answer 1

很好，他们不会必须写这样的代码，你如果把它作为一个附加的 - 但你/他们将不得不使用宏 - 没有其他办法可以做到这一点。

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-help，寻找DateLastModified。

保存在一个模块，然后按照“distibute作为插件” -howto。现在

，如果我没有做任何基本的错误，这应该提供一个新的工作表函数=LastSaveTime()，返回活动工作簿的DateLastModified任何工作簿。有可能是一个捕捉，因为activeworkbook的 - 这可能是金丹使用此作为一个附加在何时使用application.caller结构。