013	Modificar el código de un módulo VBA

LA VENTANA DE CÓDIGOS, ADEMÁS DE mostrar el código de un módulo de macro, le permite modificar cualquiera que haya sido realizado, por ejemplo, con el grabador de macros. En este ejercicio realizaremos una introducción a estos procesos y al lenguaje de códigos utilizado por la aplicación.

1 Haga doble clic sobre el módulo 1 del proyecto Prácticas1. Recuerde que para acceder al código de un módulo debe hacer doble clic sobre su nombre en el panel Proyecto.

2 Se muestra la ventana de Código con el texto de la macro que define y, como podrá comprobar, se trata de la macro TotalesMeses. Identifique la fórmula de la macro y luego la línea Selection.Font.Bold = True.

3 Esta línea establece que se aplique la propiedad Negritas. Seleccione toda la línea y pulse Ctrl.+C para copiarla.

4 Ubíquese al final de la primera línea en cuestión y pulse la tecla Retorno para insertar un salto de línea.

5 Observe que dispone de las herramientas Cortar, Copiar, Pegar en la barra de herramientas y pegue el texto copiado.

6 Seleccione la palabra Bold de la segunda línea, la que ha pegado, y cámbiela por la palabra Italic.

7 La propiedad Cursiva o itálicas se llama italic en inglés. Pulse el botón Guardar, que es el tercero de la barra de herramientas, y luego pulse el un icono de Excel.

8 Como se habrá imaginado, la aplicación Excel pasa a primer plano. Abra, si hace falta, el libro Prácticas2 y pulse el botón Totales Meses de la barra de herramientas de acceso rápido que creamos en ejercicios anteriores.

9 Efectivamente los totales mostrados en las celdas B17 a E17 cambian a cursivas. Abra ahora con un doble clic el módulo 1 del proyecto que corresponde a Prácticas2.

10 El texto Selection.Font designa un objeto e indica que los términos que siguen se aplicarán a la fuente del texto seleccionado. Name es una propiedad: la familia de fuente. Seleccione la palabra Arial y cámbiela por el texto Century Gothic, sin borrar las comillas.

11 La propiedad Size identifica el tamaño del texto. Cambie el valor que está después del signo Igual (=) por 14. En realidad, los atributos OutlineFont y Shadow no son aplicables al texto de una celda en Excel, así que si los borrara del código, no pasaría absolutamente nada.

12 El término Strikethrough indica la propiedad Tachado; Supercript indica Superíndice; Subscript indica Subíndice; y Underline indica subrayado. El valor False indica que ninguno de estos atributos se aplican. Cambie la palabra False del atributo Outlinefont por True, para que se aplique el atributo.

13 Guarde los cambios, acceda de nuevo a Excel, seleccione las celdas A3 a A15 y aplique la macro Reducción_de_fuente para ver el resultado (que ya no es muy reducido).

IMPORTANTE

La propiedad Font.ColorIndex indica el color de la fuente, que se establece con un número que corresponde a las muestras de la paleta activa, o bien con los argumentos siguientes: xlColorIndexAutomatic, para el color automático o xlColorIndexNone, para eliminar el color. Se trata de dos constantes predefinidas por la aplicación.

014	Personalizar visualización de textos de los códigos

LA APLICACIÓN VBA LE PERMITE PERSONALIZAR en otros sentidos la forma en la que se mostrará la información en la ventana Código. Permite indicar el tipo de fuente que se utilizará, el tamaño y, además, el color de cada uno de los tipos de textos de código, de fondo y de los indicadores de margen que pudieran tener.

1 Con la aplicación VBA abierta en pantalla, despliegue el menú Herramientas y seleccione el comando Opciones. En la ficha Editor del cuadro Opciones se puede establecer, entre otras cosas, si la aplicación permitirá arrastrar y colocar texto o no.

2 En la pestaña Editor del cuadro de diálogo Opciones se activan importantes herramientas como la comprobación de sintaxis automática, que le ayudará a detectar errores, además de la sangría automática y un ancho de tabulación personalizado, entre otras opciones más avanzadas. Por otra parte, puede decidir si puede arrastrar y colocar directamente el texto o si, para evitar modificaciones no deseadas, prefiere desactivar esta opción, y limitarse a copiar y pegar a la hora de hacer ediciones. Pulse la pestaña Formato del editor.

3 En esta ficha puede modificar la forma en la que se presentará el texto del código. Se habrá fijado en que en un código puede haber textos de distintos colores; de momento negro y verde, probablemente. El menú Colores de código contiene todos los tipos de texto que permiten personalizar el color. Seleccione la opción Texto de la nota y compruebe su previsualización en el campo Ejemplo.

4 Se actualiza también la propiedad Primer plano. Puede cambiar el color de Primer plano o del texto, el de Fondo y el del Indicador de margen. Despliegue el menú Primer plano con un clic en su botón de punta de flecha y escoja un color.

5 Despliegue también el menú fondo y seleccione un tono de su preferencia y compruebe que la lectura no se dificulte.

6 Establezca también un color para el Indicador: no se produce ningún también porque los textos de notas o comentarios no llevan indicador.

7 Despliegue el menú Fuente y escoja alguna opción. Nosotros hemos escogido la fuente Verdana (Europa Central).

8 Observe que también puede cambiar el tamaño de la fuente. Sin embargo, no lo haga si no lo cree necesario.

9 Seleccione, en el menú Colores de Código, la opción Texto del marcador y compruebe, ahora sí, el color y efecto del Indicador de margen.

10 También llevan indicador los textos de punto de ejecución, de llamada de retorno y de punto de interrupción. El indicador es la pequeña marca al margen que destaca la presencia de ciertos tipos de textos.

11 Pulse el botón Aceptar y compruebe el cambio inmediato en el código en pantalla.

IMPORTANTE

Tenga en cuenta que los cambios que realice en la ficha Formato del editor del cuadro Opciones afectan la forma de visualización de la ventana en general, es decir, no solamente para el código abierto en pantalla.

015	Crear un módulo de macro en VBA

UNA VEZ CONOZCA EL LENGUAJE DE códigos de VBA, podrá crear nuevas macros directamente desde Visual Basic y sin necesidad de grabar una macro en Excel. Sólo tiene que crear un módulo en el proyecto deseado, insertar en su ventana de código el texto adecuado y, finalmente, guardar los cambios.

IMPORTANTE

Cada vez que graba una macro, VBA crea un nuevo módulo con un procedimiento que contiene el código de la macro grabada y recibe el mismo nombre que esta última.

1 Pulse sobre el proyecto que corresponde al archivo Prácticas2 en el panel Proyecto.

2 En el panel Propiedades se muestra el nombre del proyecto. Haga un doble clic éste.

3 El nombre se ha hecho editable. Cámbielo por Prácticas2 y haga un clic en el fondo del panel para aplicar el cambio.

4 Despliegue el panel y haga un doble clic en su módulo 1 para mostrar el código que contiene.

5 Seleccione ahora con un arrastre el nombre del módulo en el panel Proyecto y cámbielo directamente por Reducción_fuente.

6 Se actualiza al momento en el panel Proyecto. Cambie, en el código, el valor de la instrucción .Size = 14 por = 9 e inmediatamente seleccione y copie todo el texto del código.

7 Despliegue el menú Insertar y escoja la opción Módulo.

8 Se inserta efectivamente un nuevo módulo, de momento sin código, en el proyecto seleccionado. Haga un clic en la ventana de Código y pegue en ella el contenido copiado pasos atrás.

9 A continuación, cambie el nombre del nuevo módulo por Ampliación_fuente.

10 Modifique el nombre también en sus dos apariciones en el texto del código.

11 Para la propiedad Name, cambie la fuente por Verdana.

12 Para la propiedad Size, cambie el valor 14.

13 Seleccione y elimine todas las líneas que definen las propiedades desde Strikethrough hasta Themefont.

14 Pulse la tecla Tabulador dos veces para situar el cursor de edición bajo el punto que antecede a la palabra Size y en este lugar escriba el siguiente texto: .italic = True sin olvidar el punto inicial.

15 Usando el mismo método que ya utilizó para modificar el nombre de proyectos y módulos, cambie el nombre de la Hoja 1 (Pedidos Febrero) del proyecto seleccionado por Febrero.

16 Guarde los cambios y pulse el botón Ir a Excel.

17 Pulse el botón Macro de la ficha Programador y seleccione las celdas A3 a A15.

18 Compruebe que el módulo creado, AmpliaciónFuente, se presenta aquí como una macro y ejecútela.Al eliminar el atributo Underline, la aplicación no hace ningún cambio sobre el documento. Como el texto editado con la macro ya estaba en subrayado y en cursiva, simplemente lo deja tal como estaba.