Error message on "last saved date"-VBA code

[Tigron]

Hello community,
I tried using the search function here in the forums and I reviewed quite a few tutorials online. I even asked ChatGPT, but in all cases I didn't get an answer...
I want to display the date of the last time my Excel file was saved. To do so, I used the following VBA code:

Function LastSaved()
    Application.Volatile
    LastSaved = FileDateTime(ActiveWorkbook.FullName)
End Function

In the desired cell I entered

=LastSaved()

I get the following error message: #NAME?. I re-checked the name twice. But it's definitely correct.
Any ideas what is going wrong?

P.S.: I am using the macOS version of Excel 2021. Could that be an/the issue?

 

[Micron]

According to the comments in this code, that would appear to be the issue.

 

[Tigron]

Hi Micron,
thank you for the fast reply. The more I work with Excel on macOS the more frustrated I get.
Does anybody with a Mac have a solution to my problem? I am a complete noob to VBA in Excel and could use some help.

Thanks in advance!

 

[Micron]

Isn't that code a solution for you?

 

[Tigron]

Isn't that code a solution for you?

I'm afraid, I don't know how to implement what he was writing about. I am a complete noob to VBA.

 

[Tigron]

Nobody have an idea? The proposed solution isn't what I was looking for. Besides, it also contains AppleScript, which I don't think applies to my situation, either.
I wasn't able to find anything else on the internet.

 

[Tigron]

I found a semi-solution on stackoverflow and altered it with the help of ChatGPT now the code will display the date and time like so: Wednesday, 14. June 2023 17:53:59 Of course you can change the format to your likings. Unfortunately, you need to press "update data" in order for it to show the current last save time. I couldn't find another way to circumvent this issue.

Function LastSavedTimeStamp() As String
    Application.Volatile
    LastSavedTimeStamp = Format(ActiveWorkbook.BuiltinDocumentProperties("Last Save Time"), "dddd, dd. mmmm yyyy hh:mm:ss")
End Function

For VBA-noobs like me : you need to add the following formula into the cell where the date should be displayed:

=LastSavedTimeStamp()

Cheers!