recuperer nom utilisateur session

bonjour
ce code ne marche pas non ?

Code:

---

Nom = Application.Environ("USERNAME")

---

je utilise

Code:

---

1 2 3 4 5

Private Type Users name As String * 255 End Type   Private Declare Function GetUserName Lib "advapi32" Alias "GetUserNameA" (dd As Users, ss As Long) As Boolean

---

Bonsoir,

En VBA sous excel tu peu écrire tout simplement :

Code:

---

Nom = Environ("USERNAME")

---

Bonjour tlm,

En complément de ce qu'a dit Jack

Code:

---

1 2	MsgBox Application.UserName '<-- renvoie la propriété "auteur" du classeur MsgBox Environ("username") '<-- renvoie le login de l'utilisateur du pc

---