OVH Cloud OVH Cloud

Profil windows dans VBA

5 réponses
Avatar
hélene
Bonjour,
Afin de savoir qui a imprimé un document excel, j'aimerais avoir une macro
dans excel qui me donne le profil windows de la personne ouvre le tableau.
Je ne sais pas si c'est important, mais je vous le dis quand même, nous
avons un domaine sous windows 2000.


Merci

Hélène

5 réponses

Avatar
Phil99999
Bonjour,
Si le profil windows est le nom d'utilisateur de la session en cours,
alors tu peux utiliser application.UserName.
Cette proprièeté affiche le nom d'utilisateur.

C'était ça ??


Bonjour,
Afin de savoir qui a imprimé un document excel, j'aimerais avoir une macro
dans excel qui me donne le profil windows de la personne ouvre le tableau.
Je ne sais pas si c'est important, mais je vous le dis quand même, nous
avons un domaine sous windows 2000.


Merci

Hélène





Avatar
Jacques93
Bonjour Hélene et Phil99999,

Application.UserName renvoie le nom d'utilisateur de la session en
cours si dans Outils => Options => Onglet 'Général', le champs 'Nom
d'utilisateur' n'est pas renseigné'

Pour être certain de récupérer le nom utilisé lors de l'ouverture de
session :

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

Private Sub UserName()
Dim Usr As String
Dim lResult As Long

Usr = String(255, 0)
lResult = GetUserName(Usr, Len(Usr))
If lResult <> 0 Then
If InStr(Usr, Chr$(0)) > 0 Then
Usr = Left(Usr, InStr(Usr, Chr$(0)) - 1)
MsgBox Usr
End If
End If
End Sub

Bonjour,
Si le profil windows est le nom d'utilisateur de la session en cours,
alors tu peux utiliser application.UserName.
Cette proprièeté affiche le nom d'utilisateur.

C'était ça ??



Bonjour,
Afin de savoir qui a imprimé un document excel, j'aimerais avoir une macro
dans excel qui me donne le profil windows de la personne ouvre le tableau.
Je ne sais pas si c'est important, mais je vous le dis quand même, nous
avons un domaine sous windows 2000.


Merci

Hélène







--
Cordialement,

Jacques.


Avatar
hélene
oui, merci c'était ça
"Phil99999" (!sansspam!)> a écrit dans le message de
news:
Bonjour,
Si le profil windows est le nom d'utilisateur de la session en cours,
alors tu peux utiliser application.UserName.
Cette proprièeté affiche le nom d'utilisateur.

C'était ça ??


Bonjour,
Afin de savoir qui a imprimé un document excel, j'aimerais avoir une
macro


dans excel qui me donne le profil windows de la personne ouvre le
tableau.


Je ne sais pas si c'est important, mais je vous le dis quand même, nous
avons un domaine sous windows 2000.


Merci

Hélène







Avatar
hélene
merci
quelle est la différence entre cette solution, et celle de phil ?
"Jacques93" a écrit dans le message de
news:
Bonjour Hélene et Phil99999,

Application.UserName renvoie le nom d'utilisateur de la session en
cours si dans Outils => Options => Onglet 'Général', le champs 'Nom
d'utilisateur' n'est pas renseigné'

Pour être certain de récupérer le nom utilisé lors de l'ouverture de
session :

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

Private Sub UserName()
Dim Usr As String
Dim lResult As Long

Usr = String(255, 0)
lResult = GetUserName(Usr, Len(Usr))
If lResult <> 0 Then
If InStr(Usr, Chr$(0)) > 0 Then
Usr = Left(Usr, InStr(Usr, Chr$(0)) - 1)
MsgBox Usr
End If
End If
End Sub

Bonjour,
Si le profil windows est le nom d'utilisateur de la session en cours,
alors tu peux utiliser application.UserName.
Cette proprièeté affiche le nom d'utilisateur.

C'était ça ??



Bonjour,
Afin de savoir qui a imprimé un document excel, j'aimerais avoir une
macro



dans excel qui me donne le profil windows de la personne ouvre le
tableau.



Je ne sais pas si c'est important, mais je vous le dis quand même, nous
avons un domaine sous windows 2000.


Merci

Hélène







--
Cordialement,

Jacques.




Avatar
Jacques93
Bonjour hélene,

Si dans Outils => Options => Onglet 'Général', le champs 'Nom
d'utilisateur' est renseigné, par exemple :

http://cjoint.com/?hlsWBlYtZO

Application.UserName te renverras Toto, qui n'est pas obligatoirement le
nom d'utilisateur d'ouverture de session.


merci
quelle est la différence entre cette solution, et celle de phil ?
"Jacques93" a écrit dans le message de
news:

Bonjour Hélene et Phil99999,

Application.UserName renvoie le nom d'utilisateur de la session en
cours si dans Outils => Options => Onglet 'Général', le champs 'Nom
d'utilisateur' n'est pas renseigné'

Pour être certain de récupérer le nom utilisé lors de l'ouverture de
session :

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

Private Sub UserName()
Dim Usr As String
Dim lResult As Long

Usr = String(255, 0)
lResult = GetUserName(Usr, Len(Usr))
If lResult <> 0 Then
If InStr(Usr, Chr$(0)) > 0 Then
Usr = Left(Usr, InStr(Usr, Chr$(0)) - 1)
MsgBox Usr
End If
End If
End Sub


Bonjour,
Si le profil windows est le nom d'utilisateur de la session en cours,
alors tu peux utiliser application.UserName.
Cette proprièeté affiche le nom d'utilisateur.

C'était ça ??




Bonjour,
Afin de savoir qui a imprimé un document excel, j'aimerais avoir une




macro

dans excel qui me donne le profil windows de la personne ouvre le




tableau.

Je ne sais pas si c'est important, mais je vous le dis quand même, nous
avons un domaine sous windows 2000.


Merci

Hélène







--
Cordialement,

Jacques.







--
Cordialement,

Jacques.