Propiedad Application.UserName (Project)
Obtiene o establece el nombre local del usuario actual. String de lectura y escritura.
Sintaxis
expresión. Nombre de usuario
expresión Variable que representa un objeto Application.
Comentarios
La propiedad UserName del objeto Application, muestra el nombre de usuario local. En comparación, la propiedad UserName del objeto Profile muestra el nombre de inicio de sesión.
Use la propiedad UserName para personalizar las opciones de proyecto o las macros de un usuario concreto. Por ejemplo, suponga que ha escrito una macro denominada PrintReport que imprime el informe Mio.mpp cuando se presiona CTRL+R, pero otro usuario desea utilizar las mismas teclas de método abreviado para imprimir el informe suyo.mpp. Puede editar la macro PrintReport para que comprueba la propiedad de nombre de usuario y, a continuación, imprima Mio.mpp si usted es el usuario actual o imprima suyo.mpp si no es el usuario actual.
Nota:
[!NOTA] La propiedad UserName es el nombre local, pero se puede cambiar a un valor diferente. El campo autor en el cuadro de diálogo Propiedades del proyecto es el nombre de inicio de sesión del usuario de forma predeterminada.
Ejemplo:
En el ejemplo siguiente se establecen las preferencias en función del nombre del usuario actual.
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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.