Ejercicio paso a paso. Crear una macro manualmente.

Objetivo.

Aprender cómo crear una macro de forma manual, es decir escribiendo el código a mano.

Ejercicio paso a paso.

Empezaremos por crear una macro para poner a cero el contenido de ciertas celdas de nuestra hoja de trabajo.

1 Si no tienes abierto Excel2003, ábrelo para probar el ejercicio.

2 Abre el libro ejemplo_macros de la carpeta Ejercicios del curso.

3 Guarda el libro en la carpeta Mis Documentos con el nombre libro_macros para no modificar el original.

4 Sin seleccionar ninguna celda accede al menú Herramientas.

5 Abre el submenú Macro.

6 Y presiona sobre la opción Editor de Visual Basic

Aparece la pantalla del editor.

7 Accede al menú Insertar para insertar un nuevo módulo.

8 Presiona sobre Módulo.

9 Vuelve al menú Insertar.

10 Selecciona Procedimiento...

Nos aparece el cuadro de diálogo Procedimiento.

11 En el nombre del procedimiento escribe Limpiar

12 Selecciona Procedimiento y que es de ámbito Público.

13 Presiona sobre Aceptar.

14 Escribe el código del procedimiento como se ve en la imagen, lo escrito en verde son comentarios aclaratorios, si quieres puedes no escribirlos.

15 Cierra la ventana del Editor de VisualBasic.

Ahora vamos a comprobar que funciona correctamente la macro creada.

16 Accede al menú Herramientas -- Macro.

17 Elige la opción Macros...

18 Selecciona la macro creada Hoja1.Limpiar y pulsa sobre Ejecutar.

19 Observa como las celdas del rango D10:F10 se han puesto a cero y las del rango D11:F11 se han quedado sin contenido. No cierres el libro.

Para practicar otras instrucciones de VBA, vamos a definir una macro para sumar tres celdas y dejar el resultado en otra.

20 Abre el submenú Macro.

21 Y presiona sobre la opción Editor de Visual Basic

Te aparecerá el módulo con el procedimiento limpiar. Si no es así, busca en la zona de la izquierda, en el explorador de proyectos, en la carpeta Módulos, el módulo Módulo1 y haz doble clic sobre él.

22 Accede al menú Insertar para insertar un nuevo módulo.

23 Selecciona Procedimiento...

Nos aparece el cuadro de diálogo Procedimiento.

24 En el nombre del procedimiento escribe Sumar

25 Selecciona Procedimiento y que es de ámbito Público.

26 Presiona sobre Aceptar.

27 Escribe el código del procedimiento como se ve en la imagen, lo escrito en verde son comentarios aclaratorios, si quieres puedes no escribirlos.

28 Cierra la ventana del Editor de VisualBasic.

Ahora vamos a comprobar que funciona correctamente la macro creada.

29 Accede al menú Herramientas -- Macro.

30 Elige la opción Macros...

31 Selecciona la macro creada Hoja1.Sumar y pulsa sobre Ejecutar.

Observa como la celda F10 contiene la suma de las celdas B3, B4 y B5.

Por último practicaremos con el bucle For each... next, muy útil en este tipo de programación.

32 Abre el submenú Macro.

33 Y presiona sobre la opción Editor de Visual Basic

Te aparecerá el módulo con el procedimiento limpiar. Si no es así, busca en la zona de la izquierda, en el explorador de proyectos, en la carpeta Módulos, el módulo Módulo1 y haz doble clic sobre él.

34 Accede al menú Insertar para insertar un nuevo módulo.

35 Selecciona Procedimiento...

Nos aparece el cuadro de diálogo Procedimiento.

36 En el nombre del procedimiento escribe Aumentar

37 Selecciona Procedimiento y que es de ámbito Público.

38 Presiona sobre Aceptar.

39 Escribe el código del procedimiento como se ve en la imagen, lo escrito en verde son comentarios aclaratorios, si quieres puedes no escribirlos.

Con este procedimiento aumentamos un 50% los valores contenidos en las celdas seleccionadas.

40 Cierra la ventana del Editor de VisualBasic.

Ahora vamos a comprobar que funciona correctamente la macro creada.

En este caso, como la macro funciona a partir de las celdas seleccionadas, tenemos que seleccionarlas antes de ejecutar la macro.

41 Selecciona un rango de celdas incluido en B3:B9 (selecciona los precios de los artículos que van a variar, puedes incluso seleccionar celdas no contiguas con la tecla Ctrl).

42 Accede al menú Herramientas -- Macro.

43 Elige la opción Macros...

44 Selecciona la macro creada Hoja1.Aumentar y pulsa sobre Ejecutar.

Observa como los valores de las celdas seleccionadas han aumentado un 50%.

45 Cierra el libro guardando los cambios.