How to show Author name in a cell

[suet]

Hi

I hope everyone is well. I have a question which I hope is straight forward.

I want to show the Author of the workbook in cell A1 on Sheet1 but I am unable to find an field codes that will show you this.

For example, if someone called John Doe opens and saves the workbook I want his name to appear in A1.

If someone called Janet Smith opens the same works and saves it with a new name I want her name to appear. Is there an option to do this like you have in Word?

Thanking you in advance.

Regards
Sue

 

[Georgiboy]

Maybe with a small function:

Function getLastSavedBy()
    Dim lastSavedBy As String
    lastSavedBy = ThisWorkbook.BuiltinDocumentProperties("Last Author")
    getLastSavedBy = lastSavedBy
End Function

Used in the workbook like:

=getLastSavedBy()

 

[suet]

Maybe with a small function:

Function getLastSavedBy()
    Dim lastSavedBy As String
    lastSavedBy = ThisWorkbook.BuiltinDocumentProperties("Last Author")
    getLastSavedBy = lastSavedBy
End Function

Used in the workbook like:

=getLastSavedBy()

Hi Georgiboy

Thank you very much for your prompt reply.

That worked a treat.

Many many thanks.

Have a great day.
Sue

 

[Georgiboy]

Happy to help

 

[suet]

Hiya

Sorry to bother you but could you advise how to add the Current Month and Year into cell A2 so that when the month and year change, the data in cell A2 auto updates - eg: April 2023, May 2023, June 2023.

Thanks in advance.

Regards
Sue

 

[Georgiboy]

Maybe:

=TEXT(NOW(),"mmmm yyyy")

 

[suet]

Fantastic!!! Thank you very much!!!

Have a fab day.

 

[Joe4]

I changed the "Solution" on this thread.
It is best to mark the solution to the original question, not the secondary follow up question.
That way, when searching the threads, people can see the original question and solution at the top.