Vamos a ver ahora un código muy sencillo y útil para temas de seguridad de nuestros archivos; se trata de una macro que nos permite obtener el nombre del usuario de la máquina desde la que se está abriendo el archivos.
Lo primero que vamos a hacer es ingresar al Editor de Visual Basic y para ello desde la primera hoja utilizaremos la combinación de teclas Alt + F11:
Nos ubicamos en la ventana del Explorador de Proyectos que tenemos en el panel izquierdo de la ventana del Editor de Visual Basic y damos doble clic sobre el ObjetoThisWorkbook
Private Sub Workbook_Open()
On Error Resume Next
Usuario = Application.UserName
MsgBox "El nombre de Usuario es " & Usuario
End Sub
Espero que les sirva esta publicación.
Saludos
Ing. Enrique Neciosup Morales
Tomado desde el siguiente enlace
pendejo
ResponderBorrar