En este e-mail veremos cómo se amplia una macro.

1.Cierra la ventana del editor de Visual Basic.

2.Accede a Herramientas - Macro - Macros.

3.Selecciona la macro y pulsa en el botón Opciones.

4.Asigna la letra r como combinación de teclas de la macro y acepta.

5.Cierra el último cuadro de diálogo.

6.Accede a Herramientas - Macro - Editor de Visual Basic

7.Añade al final del código y antes del fin de la rutina End Sub las siguientes líneas:

Application.CutCopyMode = False

Range("A1").Select

8.Cierra y ejecuta de nuevo la macro.

Observa que las últimas líneas hacen que el modo de Copiar se cancele y el cursor vuelva a la celda A1. Es lo mismo que si hubiésemos pulsado la tecla Esc y Ctrl + Inicio cuando grabábamos la macro.

Ver cómo trabaja una macro paso a paso.- La ejecución de una macro es muy rápida. A veces nos puede interesar ver paso a paso lo que hace una macro, sobre todo cuando hay algún fallo, para localizarlo y corregirlo.

1.Elimina y vuelve a hacer otra copia de la hoja actual.

2.Accede a Herramientas - Macro - Macros

3.Selecciona la macro y pulsa en el botón Paso a paso.

Observa cómo la macro se ha detenido en la primera línea y la ha marcado en color amarillo.

4.Ve pulsando la tecla F8 y observa cómo la macro se va deteniendo en las diferentes líneas de la rutina.

5.Finalmente, cierra la ventana de código.

Segunda tarea: añadir columnas de fechas.- Nuestro informe no incluye la fecha en cada fila, por lo que vamos a añadir una nueva columna para añadir el mes de cada registro.

1.Ejecuta la macro en la nueva hoja copiada.

2.Crea una nueva macro con el nombre: AñadirFecha y acepta.

Pasos de la macro:

1.Sitúate en la celda A1.

2.Accede a Insertar - Columnas.

3.Escribe: Fecha y pulsa Intro.

4.Vuelve a la celda y conviértela en formato negrita.

5.Selecciona el rango A2:A179

6.Escribe: Mar-98 y pulsa Ctrl + Intro.

7.Pulsa Ctrl + Inicio y finaliza la grabación.

8.Borra la hoja.

9.De la hoja original, haz una copia.

10.Ejecuta las dos macros en el orden que las hemos creado.

Evidentemente, cada vez que ejecutemos la macro, Excel rellenará las celdas recién creadas con la palabra "mar-98". Una solución sería cambiar la macro cada mes con la nueva fecha, pero no parece la solución más adecuada. Vamos a hacer que el programa nos pida el mes y posteriormente lo rellene él.

Petición de datos al usuario.-

1.Accede al código Visual Basic de la última macro creada.

2.Selecciona el texto "mar-98" (comillas incluidas)

3.Pulsa la tecla Supr para borrarlo.

4.Escribe en su lugar: InputBox ("Introduce la fecha en formato MM-AA: ")

5.Sal del cuadro de diálogo y ejecuta la macro de nuevo.En alguna hoja copia el original. En alguna hoja copia el original, o bien borra la columna A de la última hoja y ejecuta la macro.

6.Cuando te pida la fecha, escribe por ejemplo: 4-11

La orden InputBox es una función de Visual Basic que visualiza un cuadro con un mensaje personalizado para la entrada de datos cuando se está ejecutando la macro.