comment peut-on en VBA r=E9cup=E9rer le login d'un utilisateur=20
qui s'est log=E9 =E0 un serveur NT ?
Je voudrais en fait, en fonction des logins, restreindre=20
certains acc=E8s =E0 des Userform VBA =E0 certains=20
utilisateurs...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
papou
Bonjour Voici une façon (lancer la macro Test) Cordialement Pascal
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long Sub Test() Dim NomUser As String NomUser = String(100, Chr$(0)) GetUserName NomUser, 100 NomUser = Left$(NomUser, InStr(NomUser, Chr$(0)) - 1) MsgBox NomUser End Sub
"Pierrot" a écrit dans le message de news:069201c49afe$24d11770$ Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur qui s'est logé à un serveur NT ? Je voudrais en fait, en fonction des logins, restreindre certains accès à des Userform VBA à certains utilisateurs...
Merci d'avance
Pierrot
Bonjour
Voici une façon (lancer la macro Test)
Cordialement
Pascal
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA"
(ByVal lpBuffer As String, nSize As Long) As Long
Sub Test()
Dim NomUser As String
NomUser = String(100, Chr$(0))
GetUserName NomUser, 100
NomUser = Left$(NomUser, InStr(NomUser, Chr$(0)) - 1)
MsgBox NomUser
End Sub
"Pierrot" <Pierrot@discussions.microsoft.com> a écrit dans le message de
news:069201c49afe$24d11770$a401280a@phx.gbl...
Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur
qui s'est logé à un serveur NT ?
Je voudrais en fait, en fonction des logins, restreindre
certains accès à des Userform VBA à certains
utilisateurs...
Bonjour Voici une façon (lancer la macro Test) Cordialement Pascal
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long Sub Test() Dim NomUser As String NomUser = String(100, Chr$(0)) GetUserName NomUser, 100 NomUser = Left$(NomUser, InStr(NomUser, Chr$(0)) - 1) MsgBox NomUser End Sub
"Pierrot" a écrit dans le message de news:069201c49afe$24d11770$ Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur qui s'est logé à un serveur NT ? Je voudrais en fait, en fonction des logins, restreindre certains accès à des Userform VBA à certains utilisateurs...
Bonsoir Pierrot; tout simplement: MsgBox CreateObject("Wscript.Network").UserName MP
"Pierrot" a écrit dans le message de news:069201c49afe$24d11770$ Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur qui s'est logé à un serveur NT ? Je voudrais en fait, en fonction des logins, restreindre certains accès à des Userform VBA à certains utilisateurs...
Merci d'avance
Pierrot
Bonsoir Pierrot;
tout simplement:
MsgBox CreateObject("Wscript.Network").UserName
MP
"Pierrot" <Pierrot@discussions.microsoft.com> a écrit dans le message de
news:069201c49afe$24d11770$a401280a@phx.gbl...
Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur
qui s'est logé à un serveur NT ?
Je voudrais en fait, en fonction des logins, restreindre
certains accès à des Userform VBA à certains
utilisateurs...
Bonsoir Pierrot; tout simplement: MsgBox CreateObject("Wscript.Network").UserName MP
"Pierrot" a écrit dans le message de news:069201c49afe$24d11770$ Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur qui s'est logé à un serveur NT ? Je voudrais en fait, en fonction des logins, restreindre certains accès à des Userform VBA à certains utilisateurs...
Merci d'avance
Pierrot
papou
Bonjour Michel Je garde ;-) Cordialement Pascal
"Michel Pierron" a écrit dans le message de news:
Bonsoir Pierrot; tout simplement: MsgBox CreateObject("Wscript.Network").UserName MP
"Pierrot" a écrit dans le message de news:069201c49afe$24d11770$ Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur qui s'est logé à un serveur NT ? Je voudrais en fait, en fonction des logins, restreindre certains accès à des Userform VBA à certains utilisateurs...
Merci d'avance
Pierrot
Bonjour Michel
Je garde ;-)
Cordialement
Pascal
"Michel Pierron" <michel.pierron@free.fr> a écrit dans le message de
news:OiPrLf1mEHA.3896@TK2MSFTNGP15.phx.gbl...
Bonsoir Pierrot;
tout simplement:
MsgBox CreateObject("Wscript.Network").UserName
MP
"Pierrot" <Pierrot@discussions.microsoft.com> a écrit dans le message de
news:069201c49afe$24d11770$a401280a@phx.gbl...
Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur
qui s'est logé à un serveur NT ?
Je voudrais en fait, en fonction des logins, restreindre
certains accès à des Userform VBA à certains
utilisateurs...
Bonsoir Pierrot; tout simplement: MsgBox CreateObject("Wscript.Network").UserName MP
"Pierrot" a écrit dans le message de news:069201c49afe$24d11770$ Bonjour à tous,
comment peut-on en VBA récupérer le login d'un utilisateur qui s'est logé à un serveur NT ? Je voudrais en fait, en fonction des logins, restreindre certains accès à des Userform VBA à certains utilisateurs...
