Propriété Application.UserName (Project)
Obtient ou définit le nom local de l’utilisateur actuel. Type de données String en lecture-écriture.
Syntaxe
expression. Nom d'utilisateur
expressionUne variable qui représente un objetApplication.
Remarques
La propriété UserName de l’objet Application affiche le nom d’utilisateur local. En comparaison, la propriété UserName de l’objet Profile affiche le nom d’ouverture de session.
Utilisez la propriété UserName pour personnaliser les options ou macros du projet pour un utilisateur particulier. Par exemple, supposons que vous avez écrit une macro nommée PrintReport qui imprime le rapport Mine.mpp lorsque vous appuyez sur Ctrl+R, mais qu’un autre utilisateur souhaite utiliser les mêmes touches de raccourci pour imprimer le rapport Yours.mpp. Vous pouvez modifier la macro PrintReport de manière à ce qu’elle vérifie la propriété UserName et qu’elle imprime ensuite Mien.mpp si vous êtes l’utilisateur actuel ou Vôtre.mpp dans le cas contraire.
Remarque
La propriété UserName est le nom local, mais peut avoir une autre valeur. Le champ Auteur dans la boîte de dialogue Propriétés du projet est le nom d’ouverture de session de l’utilisateur par défaut.
Exemple
L’exemple suivant définit les préférences en fonction du nom de l’utilisateur actuel.
Sub GetUserName()
' Get the user name.
UserName = InputBox$("What's your name?", , UserName)
' If user is Jeff Smith, then set certain preferences.
If UserName = "Jeff Smith" Then
DisplayScheduleMessages = False
BarRounding On:=False
Calculation = True
' Otherwise, set default preferences.
Else
DisplayScheduleMessages = True
BarRounding On:=True
Calculation = False
End If
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.