Calendario Paraguay 2018
A partir de una plantilla de un calendario anual del año 2018, para Paraguay y los días feriados en ese país. Construiremos un calendario personalizado con macros.
Feriados:
- 1 de enero: Año nuevo
- 1 de marzo: Dia de los héroes de la Patria
- 29 de marzo: Jueves Santo
- 30 de marzo: Viernes Santo
- 1 de abril: Domingo de resurrección
- 1 de mayo: Dia de los trabajadores
- 15 de mayo: Dia de la Independencia Nacional
- 12 de junio: Dia de la Paz del Chaco
- 15 de agosto: Dia de la fundación de Asunción
- 29 de setiembre: Batalla de Boquerón
- 8 de diciembre: Dia de la Virgen Caacupé
- 25 de diciembre: Navidad
Para cada una de las macros que utilizaremos, empleamos CommandButtons
¿Cómo insertar un CommandButton?
Activar el desarrollador o programador-Insertar-Controles ActiveX-Seleccionar la primera opción-Click derecho en el recuadro generado-Mostrar código-ingresar el código deseado
NOTA:Repetiremos este proceso para generar los botones de comando de cada una de las macros.Asimismo para cambiar el texto dentro de los botones, dentro del editor de VBA nos dirigimos a la ventana de propiedades y en el recuadro de “caption” podemos modificar el nombre con el cual se nos presentara el botón de cada macro en la hoja de Excel.
Veamos, esto ultimo
Cambiando el "caption" del commandbutton
Primera macro: Resaltar feriados
Una vez que hemos seleccionado las celdas de las fechas festivas, les cambiamos la fuente con el uso de la funcion With…End With, cambiamos el tamaño de letra, la fuente, el color de letra,la ponemos en negrita(bold) y finalmente cambiamos el color de la celda, en ese orden.
Segunda macro: No resaltar feriados
Seleccionamos las mismas celdas que en la primera macro, pero ahora las volvemos a su apariencia anterior, tambien mediante el uso de la funcion With…End With tal y como se muestra en la siguiente captura.
Primera y Segunda macros
(Para mayor visualización de la imagen, hacer click en la misma)
Tercera Macro: Marcar sabados y domingos
Seleccionamos las celdas que contienen días sabados y domingos, les cambiamos el tamaño de letra, el estilo de fuente, la fuente, el color, las subrayamos y finalmente les cambiamos el color a las celdas, haciendo uso de la anteriormente empleada funcion With…End With
Cuarta Macro: Desmarcar sabados y domingos
Para esta ultima macro, seleccionamos la mismas celdas o rangos de celdas de la tercera macro y las retornamos a su estado inicial, tambien empleando la funcion With…End With, como se puede observar en la imagen.
Tercera y Cuarta macros
(Para mayor visualización de la imagen, hacer click en la misma)