How to show current user name in a cell?

excel vba excel-2003 worksheet-function

Based on the instructions at the link below, do the following.

In VBA insert a new module and paste in this code:

Public Function UserName()    UserName = Environ$("UserName")End Function

Call the function using the formula:

=Username()

Based on instructions at:

excel vba excel-2003 worksheet-function

Without VBA macro, you can use this tips to get the username from the path :

=MID(INFO("DIRECTORY"),10,LEN(INFO("DIRECTORY"))-LEN(MID(INFO("DIRECTORY"),FIND("\",INFO("DIRECTORY"),10),1000))-LEN("C:\Users\"))

excel vba excel-2003 worksheet-function

if you don't want to create a UDF in VBA or you can't, this could be an alternative.

=Cell("Filename",A1) this will give you the full file name, and from this you could get the user name with something like this:

=Mid(A1,Find("\",A1,4)+1;Find("\";A1;Find("\";A1;4))-2)

This Formula runs only from a workbook saved earlier.

You must start from 4th position because of the first slash from the drive.

CodeHunter