En este ejemplo, la ficha "Mis Macros" contiene tres iconos. Cada uno de ellos activa una macro ("Saludo" saluda al usuario con un "buen día" o "buenas tardes" de acuerdo a la hora del día; "Fecha" muestra la fecha corriente y "Hora" la hora).
Desde la versión 2007 de Excel en adelante no tenemos la posibilidad de programar la cinta de opciones con Vba, tal como podíamos hacer en las versiones anteriores donde podíamos crear barras de herramientas o agregar un nuevo elemento en la barra del menú de Excel programáticamente.
Si bien podemos agregar pestañas (fichas) en la cinta de opciones usando el menú Opciones-Personalizar Cinta de Opciones, agregar iconos a la ficha y ligar macros a los iconos, esta ficha es permanente, es decir, aparecerá en todo cuaderno de Excel que abramos. Lo mismo con los iconos que agreguemos en la barra de heramientas de accedso rápido (QAT).
Sin embargo podemos modificar la cinta de opciones dinámicamente, es decir, ligar la cinta modificada a un cuaderno determinado de manera que cuando cerramos el cuaderno las modificaciones desaparecen. Gracias a los excelente tutoriales de MVP Ron de Bruin la tarea es relativamente sencilla y no requiere dominio de detalles técnicos.
En este post mostraré los pasos para crear la pestaña para activar macros del ejemplo.
La forma más conveniente de editar la cinta de opciones es utilizando la herramienta Custom UI Editor que es gratuita y puede descargarse aquí.
Empezamos por crear el cuaderno que contiene las macros (el cuaderno con los códigos puede descargarse aquí). Una vez creado, guardamos y cerramos el cuaderno.
El próximo paso es activar el Custom UI Editor, abrir el archivo Excel que hemos creado (File - Open, en el editor) y elegir una de las dos opciones Office 2010 u Office 2007 en el menú Insert
Si el cuaderno será usado solamente con Excel 2010-2013 elegimos la opción Office 2010 Custom UI Part; para archivos que serán usados en Excel 2007-2013 usamos la opción Office 2007 Custom UI Part.
En nuestro ejemplo usaremos la segunda opción. En el editor pegamos este código
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" >
<ribbon >
<tabs >
<tab id="DbMacros" insertBeforeMso="TabInsert" label="Mis Macros">
<group id="DbGroup01" imageMso="ReviewEditComment" label="Macros">
<button id="DbG01B01" label="Saludo" imageMso="HappyFace" size="large" onAction="Saludos" />
<button id="DbG01B02" label="Fecha" imageMso="HeaderFooterCurrentDate" size="large" onAction="la_fecha" />
<button id="DbG01B03" label="Hora" imageMso="SlideShowRehearseTimings" size="large" onAction="la_hora" />
</group >
</tab >
</tabs >
</ribbon >
</customUI >
Un archivo texto con el código puede descargarse aquí.En la ventana del Custom UI Editor, este código se vera así
Analicemos las distintas partes del código XML que define la pestaña que agregamos:
<tab id="DbMacros" insertBeforeMso="TabInsert" label="Mis Macros">
En esta orden definimos un identificador, definimos dónde debe aparecer la pestaña en la cinta (a la izquierda de la pestaña Insertar) y la descripción (label).
<group id="DbGroup01" imageMso="ReviewEditComment" label="Macros">
<button id="DbG01B01" label="Saludo" imageMso="HappyFace" size="large" onAction="Saludos" />
<button id="DbG01B02" label="Fecha" imageMso="HeaderFooterCurrentDate" size="large" onAction="la_fecha" />
<button id="DbG01B03" label="Hora" imageMso="SlideShowRehearseTimings" size="large" onAction="la_hora" />
</group >
Definimos el grupo y los botones que aparecerán dentro del grupo. Para cada botón definimos el identificador, la etiqueta, la imagen, el tamaño y con onAction la macro que será activada al pulsar el icono.
Las imágenes de los iconos están definidas por el valor de imageMso. Una lista de los iconos con sus nombre puede verse en esta página.
Después de introducir el código xml en el Custom UI Editor lo guardamos con el menú Save As
El archivo con las macros puede descargarse aquí.
