Last saved date and time

Excel 2000 by the way

Kender ikke nogen funktion, men du kan måske bruge nedenstående:


Sub navnpåsub()

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(ActiveWorkbook.FullName)

Dim LastModified As Date
LastModified = f.DateLastModified

End sub

Det kan også gøres med denne vba-funktion.

Function LastSaveTime()
Application.Volatile
LastSaveTime = BuiltinDocumentProperties("Last save time")
End Finction

Tak! jeg leger lige lidt og vender tilbage.

asol> den kunne jeg ikke få til at virke!

bak> den var OK, svar?

Fint, bemærk at jeg kun postede fordi du specifik skrev xl2000
Den virker på xl2000 og derover, mens ved xl97 er der nogle problemer