Caso práctico 1. Partiremos de un libro de trabajo que tenga grabadas las macros que deseamos combinar.

Se pide: Crear una macro que aplique un formato numérico con separador de miles y dos cifras decimales a los datos seleccionados, y que cambie el color de la letra a rojo. La nueva macro debe ser la combinación de las macros FNUM y LETRAROJA, vistas anteriormente, y la guardaremos con el nombre COMBINAR. Una vez creada la macro, la ejecutaremos paso a paso con el depurador de VBA.

Solución: Iniciamos la grabación de la macro, la cual tendrá el método abreviado Ctrl+Mayús+C, y el nombre COMBINAR.  Una vez empezada la grabación apretaremos el icono Ejecutar Macro  y en el cuadro de diálogo Macro seleccionaremos la macro FNUM y la ejecutaremos. A continuación actuaremos del mismo modo con la macro LETRAROJA.

Finalizaremos la grabación de la macro haciendo clic en el icono Detener grabación.

En la Figura 8.65 podemos ver el código de la nueva macro. En este caso observamos que el código se reduce a la ejecución de ambas macros, mediante sendas instrucciones Application.Run, con lo que no podemos eliminar ninguna instrucción sobrante.

Fig. 8.65. Código de la macro COMBINAR.

Probemos la ejecución de la macro. Utilizaremos el mismo rango de la Figura 8.60. Lo seleccionamos y tecleamos Ctrl+Mayús+C. El aspecto del rango tras la ejecución es el que muestra la Figura 8.66.

Fig. 8.66. El rango tras la ejecución de la macro COMBINAR.