Cómo utilizar VBA para Recuperar nombre de usuario de Microsoft Windows

Internet de banda ancha, fácil de configurar routers y equipos relativamente económicos han llevado a una explosión en el crecimiento de las redes de pequeñas oficinas y el hogar. La gente usa el poder de la conectividad para compartir el acceso y trabajar en todo tipo de archivos - especialmente los creados en programas de Microsoft Office. Al compartir archivos creados en Office - sin importar si fue creada con Access, Excel, PowerPoint o Word - a menudo es difícil determinar qué usuario crea un archivo. Sin embargo, con un poco de código VBA relativamente simple, puede agregar el nombre de usuario actual de Windows - no el "Autor o registrado Nombre de usuario" en la oficina - del creador del documento, archivo de formulario de presentación u hoja de cálculo en cuestión de minutos.

Instrucciones

1 Abra la aplicación de Microsoft Office en el que desea agregar el código de macro VBA necesaria para mostrar el nombre del usuario actual. Haga clic en la pequeña flecha hacia abajo junto al globo Office o icono del programa en la esquina superior derecha de la ventana. Haga clic en el enlace "Más comandos".

2 Haga clic en "Personalizar la cinta", haga clic y activar la opción de "desarrollador" en el panel derecho de la ventana. Haga clic en el botón "OK".

3 Abrir un documento al que desea agregar el código VBA. Abrir una versión en blanco del documento, hoja de cálculo o una presentación de forma - o uno que los usuarios pueden personalizar - ya que debe guardar el objeto como plantilla.

4 Haga clic en la ficha "Archivo" en la barra de herramientas, luego "Guardar como". Seleccionar la opción "Plantilla habilitada para macros" en la lista desplegable "Guardar como tipo". Introduzca un nombre para la plantilla, a continuación, haga clic en "Guardar".

5 Haga clic en la pestaña "revelado" en la barra de herramientas, haga clic en "Macros". Tipo "CurrentWindowsUser" en el cuadro "Nombre de macro", a continuación, haga clic en "Crear".

6 Copia y pega el código siguiente en el "NewMacros (Código)" ventana:

Sub CurrentWindowsUser ()

Dim como secuencia MyText

MyText = Environ ( "nombre de usuario")

Selection.TypeText (MyText)

End Sub

7 Haga clic en el icono "Guardar" en la barra de herramientas de VBA.

8 Haga clic en la ficha "Archivo", a continuación, guardar. Cierre el documento de plantilla.

9 Haga clic en "Archivo", "Nuevo" y luego "Mis plantillas". Destaca la nueva plantilla en la lista, a continuación, haga clic en "Aceptar".

10 Coloque el cursor en el lugar donde desea insertar el nombre de usuario actual de Windows. Haga clic en la pestaña "desarrolladores", luego "macros".

11 Resalte la macro "CurrentWindowsUser", a continuación, haga clic en el botón "Ejecutar". El actual nombre de usuario de Windows aparece en el archivo de objetos de Microsoft en la posición seleccionada.

Consejos y advertencias

• También puede utilizar el botón "Personalizar cinta de opciones" en el área de configuración de la aplicación de Microsoft Office para agregar un botón para el código de macro VBA y de la barra de herramientas. Esto le permite ejecutar el código de macro con un solo clic del ratón. Haga clic en "Más comandos", "Personalizar cinta de opciones", luego seleccione "Macros" en la lista desplegable llamada "elegir comandos". Resalte la macro "CurrentWindowsUser" y haga clic en "Añadir" para añadir la macro a una de las pestañas de la aplicación.