récupérer le Login

  • Initiateur de la discussion Francois
  • Date de début
F

Francois

Guest
Bonjour tout le monde.
Je voudrai savoir comment dans excel récupérer le nom de la personne qui est loguée.
Merci
 
@

@+Thierry

Guest
Salut François

Si on parle de log-in sous system NT ou 2000, voici une function qui fait appel à une API qui récupère l'ID du User :

Option Explicit
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long

Sub Get_User_Name()

Dim lpBuff As String * 25
Dim ret As Long, UserName As String
ret = GetUserName(lpBuff, 25)
UserName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1)
MsgBox UserName

End Sub

Dans Office 2000 tu as un fichier "Sample.xls" qui contient pas mal d'exemple dont celui là.

Bon Aprèm
@+Thierry
 

Discussions similaires

Réponses
3
Affichages
104

Statistiques des forums

Discussions
311 720
Messages
2 081 915
Membres
101 837
dernier inscrit
Ugo