That means Excel cannot find the function "UserName", so the code is NOT on
a module, but on a worksheet or class module.
Move the code to a module in the WB in which it is used.

NickHK

"ivory_kitten" wrote in message
...
Macro Security is set to Low as we have Virus protection. When they open
the
spreadsheet the field contains the data =username(). The result displayed
in
the cell is #NAME!.

"NickHK" wrote:

What security setting do they use ?
Is the being fired at all ?
So if they enter "=UserName()" in a worksheet cell, what is the result ?

A few more details would help, instead of only "does not work".

NickHK

"ivory_kitten" wrote in message
...
My VBAProject is (CostCalculator.xlt) and the username function is in
the
Modules folder, and is called Module1

This is the code which exists in Module1

Public Function UserName() As String
Application.Volatile
UserName = Application.UserName
End Function

"NickHK" wrote:

In a separate module or in a worksheet ?
The function must be in a module (not on a worksheet) and Public to
use
it
on a worksheet.

NickHK

"ivory_kitten" wrote in
message
...
In a module in the worksheet

"NickHK" wrote:

Where did place the code for the username function ?
In the WB you sent them ?
Or in Personal.xls ?

NickHK

"ivory_kitten" wrote in
message
...
It's only working on my computer, when other users try to open
my
spreadsheet, the username function does not work!?

"Leith Ross" wrote:


Hello Ivory_Kitten,

VBA makes this information available through the global call
Application.UserName. The value returned is a string.

Here is a UDF you can use. You will need to add a VBA module
to
project
and place this code in it before you can use it.

1) Copy the code uing CTRL+C.
2) Open the Workbook you will be using.
3) Press ALT+F11 to open the VBA Editor
4) Press ALT+I to activate the Insert Menu.
5) Press M to insert a new Module into the Workbook.
6) Press CTRL+V to paste the code into the Module.
7) Press CTRL+S to save the Macro.
8) Press ALT+Q to close the VBA Editor.


Code:
--------------------

Public Function UserName() As String
Application.Volatile
UserName = Application.UserName
End Function

--------------------


B71 formula =UserName()
B71 will now show the name of the user currently logged on.

Sincerely,
Leith Ross


--
Leith Ross



------------------------------------------------------------------------
Leith Ross's Profile:
http://www.excelforum.com/member.php...o&userid=18465
View this thread:
http://www.excelforum.com/showthread...hreadid=561907