En la mayoría de los recursos en línea que puedo encontrar, usualmente me muestran cómo recuperar esta información en VBA. ¿Hay alguna forma directa de obtener esta información en una celda?¿Cómo mostrar el nombre de usuario actual en una celda?
Por ejemplo tan simple como =ENVIRON('User') (que no funcionaba)
Sobre la base de las instrucciones en el siguiente enlace, haga lo siguiente.
En VBA insertar un nuevo módulo y pegar en este código:
Public Function UserName()
UserName = Environ$("UserName")
End Function
Llame a la función usando la fórmula:
=Username()
Basado en instrucciones en:
La forma más sencilla es crear una macro VBA que envuelve esa función, así:
Function UserNameWindows() As String
UserName = Environ("USERNAME")
End Function
Entonces llamaremos a partir de la célula :
=UserNameWindows()
Ver this article para más detalles, y otras formas.
Ejemplo: para ver el nombre de usuario de Windows en la Celda C5, puede usar th es la escritura:
Range("C5").Value = ": " & Environ("USERNAME").
si no desea crear una UDF en VBA o si no puede, esto podría ser una alternativa.
=Cell("Filename",A1) esto le dará el nombre de archivo completo, y desde este se pudo obtener el nombre de usuario con algo como esto:
=Mid(A1,Find("\",A1,4)+1;Find("\";A1;Find("\";A1;4))-2)
esta fórmula sólo se ejecuta a partir de un libro guardado anteriormente .
Debe comenzar desde la 4ª posición debido a la primera barra oblicua de la unidad.
Esto muestra el nombre del usuario actual:
Function Username() As String
Username = Application.Username
End Function
La propiedad Application.Username mantiene el nombre introducido con la instalación de MS Office.
escribe esta fórmula en una celda:
=Username()
Gracias! No funcionó para mí antes porque no creé un nuevo módulo. Ahora todo está bien. –
para cualquier persona que se encuentre con esto en 2016, el enlace de arriba no funciona –
El enlace se ha corregido por cierto después del comentario anterior ... – Gallus