Je recherche des informations ou des exemples de code pour la fonction Environ
dans VBA pour récupérer le nom d'utilisateur sur le système actuel.
Environ()
vous obtient la valeur de n'importe quelle variable d'environnement. Ceux-ci peuvent être trouvés en exécutant la commande suivante dans l'invite de commandes:
set
Si vous vouliez obtenir le nom d'utilisateur, vous feriez:
Environ("username")
Si vous vouliez obtenir le nom complet, vous feriez:
Environ("userdomain") & "\" & Environ("username")
Comme mentionné par Eric, vous pouvez utiliser environ avec l'argument ComputerName comme ceci:
MsgBox Environ("USERNAME")
Quelques informations supplémentaires qui pourraient vous être utiles:
Sub EnumSEVars()
Dim strVar As String
Dim i As Long
For i = 1 To 255
strVar = Environ$(i)
If LenB(strVar) = 0& Then Exit For
Debug.Print strVar
Next
End Sub
Parfois, lorsque nous utilisons la fonction Environ()
, nous pouvons obtenir l'erreur Library ou propriété non trouvée. Utilisez VBA.Environ()
ou VBA.Environ$()
pour éviter l'erreur.