如何获取VBA中的当前用户名?

我只需要获取当前用户的名称,以便我可以访问其文件夹中的应用程序数据文件夹….我必须在VBA中这样做,所以是…请帮助。

我相信这是类似的

Environ("Username")

您不需要用户名就可以知道哪个文件夹是应用程序数据文件夹。

您需要使用带有CSIDL_APPDATA值的SHGetFolderPath函数。

 Private Declare Function SHGetFolderPath Lib "shell32.dll" Alias "SHGetFolderPathA" (ByVal hwnd As Long, ByVal csidl As Long, ByVal hToken As Long, ByVal dwFlags As Long, ByVal pszPath As String) As Long Private Const CSIDL_APPDATA As Long = &H1A Private Const MAX_PATH As Long = 260 

 Dim s As String s = String$(MAX_PATH, 0) SHGetFolderPath 0, CSIDL_APPDATA, 0, 0, s MsgBox Left$(s, InStr(1, s, vbNullChar))