Last Saved by author for XLSM files in a directory without opening files

[PeterMac65]

Hi,
I'd like to get the name of the author who last saved the files

I can get the FileDateTime but cant see how best to get the author.
Can someone point me in the right direction

Regards Peter

exist = Dir(coster_folder & "\" & "*.xlsm")
While exist <> ""

Cells(r, 7).Value = Format(FileDateTime(coster_folder & "\" & exist), "yyyy-mm-dd h:mmampm")

r = r + 1
exist = Dir
Wend

 

[Trevor G]

You can use the Built In Properties

Debug.Print ThisWorkbook.BuiltinDocumentProperties("Last Author")