Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre avec quel
profil on est sous Windows en mode multiutlisateur.
Comment puis-je récupérer cette information car je dois copier un fichier
dans le dossier :
C:\Documents and Settings/<Nom du User>
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
Fred
Dans le message:43291358$0$7830$, Jacques écrit:
Bonjour,
Bonjour,
Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre avec quel profil on est sous Windows en mode multiutlisateur. Comment puis-je récupérer cette information car je dois copier un fichier dans le dossier : C:Documents and Settings/<Nom du User>
Avec Environ$("USERPROFILE") tu récupères le chemin d'accès. Pour d'autres besoins, dans une invite de commande, en tapant set, tu vois la liste des variables d'environnement récupérables.
-- Fred http://www.cerbermail.com/?3kA6ftaCvT
Dans le message:43291358$0$7830$8fcfb975@news.wanadoo.fr,
Jacques écrit:
Bonjour,
Bonjour,
Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre
avec quel profil on est sous Windows en mode multiutlisateur.
Comment puis-je récupérer cette information car je dois copier un
fichier dans le dossier :
C:Documents and Settings/<Nom du User>
Avec Environ$("USERPROFILE") tu récupères le chemin d'accès.
Pour d'autres besoins, dans une invite de commande, en tapant set, tu
vois la liste des variables d'environnement récupérables.
Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre avec quel profil on est sous Windows en mode multiutlisateur. Comment puis-je récupérer cette information car je dois copier un fichier dans le dossier : C:Documents and Settings/<Nom du User>
Avec Environ$("USERPROFILE") tu récupères le chemin d'accès. Pour d'autres besoins, dans une invite de commande, en tapant set, tu vois la liste des variables d'environnement récupérables.
-- Fred http://www.cerbermail.com/?3kA6ftaCvT
Patrick Fredin
Bonjour,
Tu peux utiliser l'API et la fonction suivante pour récupérer le login :
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" ( _ ByVal lpBuffer As String, nSize As Long) As Long
Function WinUser() As String Dim strLogin As String Dim lSize As Long
lSize = 255 strLogin = Space$(lSize)
Call GetUserName(strLogin, lSize) If lSize - 1 > 0 Then WinUser = Left$(strLogin, lSize - 1) Else WinUser = "Aucun" End If End Function
Tu peux aussi utiliser la bibliothèque "Microsoft Script Host Object Model" qui permet d'avoir des infos entre autres sur les répertoires de l'utilisateur.
-- Patrick
"Jacques" wrote:
Bonjour,
Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre avec quel profil on est sous Windows en mode multiutlisateur. Comment puis-je récupérer cette information car je dois copier un fichier dans le dossier : C:Documents and Settings/<Nom du User>
Merci d'avance.
Jacques
Bonjour,
Tu peux utiliser l'API et la fonction suivante pour récupérer le login :
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA"
( _
ByVal lpBuffer As String, nSize As Long) As Long
Function WinUser() As String
Dim strLogin As String
Dim lSize As Long
lSize = 255
strLogin = Space$(lSize)
Call GetUserName(strLogin, lSize)
If lSize - 1 > 0 Then
WinUser = Left$(strLogin, lSize - 1)
Else
WinUser = "Aucun"
End If
End Function
Tu peux aussi utiliser la bibliothèque "Microsoft Script Host Object Model"
qui permet d'avoir des infos entre autres sur les répertoires de
l'utilisateur.
--
Patrick
"Jacques" wrote:
Bonjour,
Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre avec quel
profil on est sous Windows en mode multiutlisateur.
Comment puis-je récupérer cette information car je dois copier un fichier
dans le dossier :
C:Documents and Settings/<Nom du User>
Tu peux utiliser l'API et la fonction suivante pour récupérer le login :
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" ( _ ByVal lpBuffer As String, nSize As Long) As Long
Function WinUser() As String Dim strLogin As String Dim lSize As Long
lSize = 255 strLogin = Space$(lSize)
Call GetUserName(strLogin, lSize) If lSize - 1 > 0 Then WinUser = Left$(strLogin, lSize - 1) Else WinUser = "Aucun" End If End Function
Tu peux aussi utiliser la bibliothèque "Microsoft Script Host Object Model" qui permet d'avoir des infos entre autres sur les répertoires de l'utilisateur.
-- Patrick
"Jacques" wrote:
Bonjour,
Pour une procédure d'instal en VBA Excel, j'a besoin de connaitre avec quel profil on est sous Windows en mode multiutlisateur. Comment puis-je récupérer cette information car je dois copier un fichier dans le dossier : C:Documents and Settings/<Nom du User>
