Estos pasos se realizan con Office 2010 (excepto donde se indique lo contrario), pero también deberían ser lo suficientemente similares para 2007 y 2013. Lo estoy haciendo con Excel pero las diferencias deberían ser sutiles.
El primer paso es agregar la pestaña Desarrollador a la cinta.
En Office 2007,
Haga clic en "Menú de Office" -> " Opciones (del programa) ". ("Menú de Office" se refiere al botón en la esquina superior izquierda). Esto abre un menú que tiene un botón "Opciones de Excel", "Opciones de Word", etc., en la parte inferior.
En el cuadro de diálogo de opciones, marque "Mostrar pestaña Desarrollador en la cinta de opciones":
y haga clic en "Aceptar".
- Debería aparecer su nueva pestaña "Desarrollador".
En Office 2010 y 2013,
Haga clic en Archivo -> Opciones .
Elija Personalizar cinta de opciones .
En el lado derecho, busque Desarrollador y marque la casilla. Haz clic en Aceptar .
Debería aparecer su nueva pestaña, haga clic en ella y luego haga clic en Visual Basic .
Se muestra una pantalla desalentadora, que es la ventana de edición de código VBA.
Nota al margen : también puede abrir la ventana de edición de código VBA utilizando el método abreviado de teclado Alt+ F11(incluso si no se muestra la pestaña Desarrollador).
Dentro de la ventana de edición de código, en el lado izquierdo debería tener un panel llamado Project-VBAProject. En esto, debajo de los Objetos de Microsoft Excel (este nombre es diferente dependiendo del programa (Word, Outlook, etc.) que esté usando) es una 'cosa' llamada ThisWorkbook. Haga doble clic en ThisWorkbook
En este ejemplo, usaremos el siguiente código.
sub WarnMeOfDanger()
MsgBox "Argh, a dragon is behind you!"
end sub
Todo lo anterior hace es abrir un cuadro de diálogo para mostrar un mensaje en pantalla.
Copie el código y péguelo en la hoja blanca en la ventana de edición de código VBA.
Ahora, en la parte superior de la ventana del editor de código VBA, haga clic en el botón verde de reproducción y debería ver un mensaje.
Por lo tanto, cada vez que desee ejecutar el código, vuelva a esta pantalla y presione reproducir.
Sin embargo, es posible que prefiera agregar su propio botón. Si desea agregar un botón, primero, tenga en cuenta la primera línea del código WarnMeOfDanger()
. Este es en realidad el nombre de nuestra ' subrutina '. Recordaremos esto para más tarde. Ahora, simplemente cierre la ventana que ha estado usando (el código se guarda automáticamente).
Aún en la cinta de desarrollador, haga clic en Insertar y elija el primer elemento, que es un botón. El cursor del mouse se convierte en una pequeña cruz (no enojado, me refiero a su apariencia). Dibuja el tamaño del botón. Aparece una nueva ventana y debería mostrarnos la opción de asignar el botón a una función. En este caso, deberíamos ver algo así ThisWorkbook.WarnMeOfDanger
. Haga clic en esto y haga clic en Aceptar .
Ahora, si presiona su nuevo botón, se mostrará el mensaje. Haga clic derecho en el botón para obtener opciones para moverlo, cambiar el texto, cambiar el tamaño, etc.