Excel查找用户名

Question

我正在使用Excel 2010.我在模块中有以下两个函数来检索当前用户登录名和全名：

Function GetUserFullName() As String
    Set WSHnet = CreateObject("WScript.Network")
    UserName = WSHnet.UserName
    UserDomain = WSHnet.UserDomain
    Set objUser = GetObject("WinNT://" & UserDomain & "/" & UserName & ",user")
    GetUserFullName = objUser.FullName
End Function

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

在我的工作表上，我通过在两个不同的单元格中使用以下内容来调用它们：

=ADUsername()

=GetUserFullName()

正常工作并检索我的详细信息。一旦他们的PC上的其他人打开它，它仍然显示我的详细信息 - 这是为什么？我无法让它刷新。