L'API GetUserName() récupère le nom d'utilisateur Windows connecté actuellement si ça peut t'aider.
Il faut déclarer la ligne suivante dans un module:
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Puis utiliser GetUserName() de la manière qui suit:
strUserName = String(100, Chr$(0))
GetUserName strUserName, 100
strUserName = Left$(strUserName, InStr(strUserName, chr$(0)) - 1)