ms excel 2010中用于获取环境变量用户名的用户定义函数不起作用

Question

我在ms excel 2010中创建了一个用户定义的函数，用于通过environvariable“USERNAME”获取当前登录的用户。

但是，在win7上运行ms excel2010的某些机器上，此功能不会更新当前用户名。

我已将其打包在受保护的工作表中并分发给多个用户。

udf代码就是这样的： 公共功能用户名（）     UserName = Environ $（“UserName”） 结束功能

然后使用公式调用该函数：

=用户名（）

Answer 1

考虑：

Public Function WhoAmI() As String
   Application.Volatile
   WhoAmI = "The NT Logon User is " & Environ("username")
   WhoAmI = WhoAmI & vbCrLf & "The Office Username is " & Application.UserName
End Function

应该适用于任何 Windows 系统。