VBA中的Windows用戶名

Question

我想知道如何在VBA中訪問Windows用戶名，我的意思是下面顯示的用戶名：

我給出了這個精度，因為我嘗試過使用Environ("Username") ，但這給出了我必須輸入的登錄才能啟動與我想要的名稱不同的窗口。

Answer 1

你應該能夠使用這樣的函數：

Public Function GetUserDisplayName() As String
    GetUserDisplayName = GetObject("LDAP://" & CreateObject("ADSystemInfo").UserName).DisplayName
End Function