Drop-Down Calendar Control

A new drop-down calendar challenge

This time the challenge has been to create a Drop-Down Calendar without any handle Windows APIs, because in Excel 2010 and 2013 is not available the "Calendar Control" add and I didn't want to enable the previous versions of the calendar control for Microsoft Excel 2010.

You can see in any cell pressing the right mouse button or in the cells of the columns that have "*DATE*" in the first row or, knowing something about VBA macros, selecting the cell's range where will be displayed the drop-down calendar.

This calendar can be customized without knowing about macros or VBA, because the calendar image is obtained from the "CalCon" sheet and dates such as holidays or events are selected in the "CalFechas" sheet.


Download this drop-down calendar control

Link to download the Drop-Down Calendar template from here:

Control de Calendario PW2.xlsm 


Drop-Down Calendar Requirements

The following requirements have been proposed:
  1. Programming the Control with minimal use of VBA macros, only to display the Control and to change selected month.
  2. Create the Control with only native Excel forms, either images or form controls and ActiveX.
  3. Calculate and plot the calendar using Excel formulas.
  4. Show the month of the date of the active cell.
  5. Controlling the change of dates into protected cells.
  6. Easily change the month and year shown.
  7. Quickly return to the current day or the day of the active cell.
  8. Shadow the selected day just when it is changed the date of the active cell.
  9. Display week number starting on Sunday or Monday and according to ISO 8601
  10. Change Control zoom. (Buttons: < 0 >)
  11. Display the Control around the active cell.
  12. To include holiday dates colored and automatically generated, for example How to make the Easter dates.


More Drop-Down Calendar Requirements

18-11-2014: I added some additional features to this calendar control to facilitate its use, that you can see in the animated picture:
  1. Mark the days above the mouse cursor is passing over.
  2. Check if you mark the days above the cursor is passing. (Button: o)
  3. Check that shows everyday. (Button: x)
  4. Control the number and type of week: weeks start on Monday or Sunday. (Button: w)
  5. Copy control to an existing or new sheet. ("CalCon" sheet button: "Copy the Control shape on a sheet")

Drop-Down Calendar video

In the video you can see how to include the form into any sheet grouped together, whether new or existing, and how to copy the macros of "CalTest" or "CalFechas" sheet to the new sheet where the Calendar will be displayed.



Enable the old Drop Down Calendar

If after knowing my new Calendar control you still want to enable Excel 2007 control in following versions, you can read the next Microsoft support, knowing that 64-bit Windows doesn't work with the old Control: Habilitar Control de calendario y DatePicker para Microsoft Excel 2010


Control de Calendario Desplegable en Excel

Reto de un nuevo Calendario Desplegable

El reto esta vez ha sido crear un Calendario Desplegable sin necesidad de manejar las APIS de Windows, porque en Excel 2010 y 2013 no está disponible el complemento "Control de calendario" y no quería tener que habilitar el control de calendario para Microsoft Excel 2010 de versiones anteriores.

Se puede ver en cualquier celda con el botón derecho del ratón o en las celdas de las columnas que tienen "*FECHA*" en la primera fila o, sabiendo algo de macros en VBA, seleccionar el rango de celdas en que se mostrará el Calendario Desplegable.

Este calendario es personalizable sin saber de macros ni VBA pues la imagen del calendario se obtiene de la hoja "CalCon" y las fechas señaladas como días festivos o acontecimientos se escogen en la hoja "CalFechas".


Descarga del Calendario Desplegable

Enlace para descargar la plantilla del Calendario Desplegable aquí:

Control de Calendario PW2.xlsm 


Requisitos del Calendario Desplegable

Los requisitos han sido:
  1. Programar el Control con el uso mínimo de macros VBA, solo para visualizar el Control y los cambios de mes.
  2. Crear el Control únicamente con formas nativas de Excel, ya sean imágenes o controles de formulario y ActiveX.
  3. Calcular y representar gráficamente el calendario usando las fórmulas de Excel.
  4. Mostrar el mes de la fecha de la celda activa.
  5. Controlar la modificación de la fecha de celdas activas protegidas.
  6. Cambiar fácilmente el mes y año mostrados.
  7. Retornar rápidamente al día actual o al día de la celda activa.
  8. Sombrear el día seleccionado a la vez que se cambia en la celda activa.
  9. Mostrar el número de semana comenzando en domingo o lunes y según ISO 8601
  10. Cambiar el zoom del Control. (Botones: < 0 >)
  11. Orientar el Control para que se muestre lo mejor posible alrededor de la celda activa.
  12. Incluir fechas de festivos coloreadas y generadas automáticamente, por ejemplo calculando la Semana Santa.

Más requisitos del Calendario Desplegable

18-11-2014: He añadido algunas características adicionales al control de este calendario para facilitar su uso que se pueden ver en esta imagen animada:
  1. Marcar los días por los que pasa el cursor.
  2. Controlar si se marcan los días por los que pasa el cursor. (Botón: o)
  3. Controlar si se muestran todos los días. (Botón: x)
  4. Controlar el número y el tipo de semana: la semana comienza en lunes o domingo. (Botón: w)
  5. Copiar el control a una hoja existente o nueva. (Botón de la hoja "CalCon": "Copia la forma del Control en una hoja")

Vídeo del Calendario Desplegable

En el vídeo se puede ver cómo hacer para incluir la forma agrupada en cualquier hoja, sea nueva o existente, y cómo copiar las macros de la hoja "CalTest" o "CalFechas" a la nueva hoja para que se despliegue el Calendario.



Habilitar el viejo Calendario Desplegable

Si después de conocer mi nuevo Control de Calendiario aún quieres habilitar el control de Excel 2007 en las siguientes versiones, puedes leer el siguiente soporte de Microsoft, conociendo que en Windows de 64 bits no funciona el viejo Control: Habilitar Control de calendario y DatePicker para Microsoft Excel 2010


Calcular la retirada de un cajero

El cajero

Este artículo no trata sobre el cajero del PP, ni de su ex-tesorero y sus papeles de la caja B, ni de su contable y las cuentas de anónimos, ni de los sobres-sueldos a la formación, ni de los pagos en negro para remodelar la sede, ni de los sobres con dinero fraccionado para que nunca superara los 60.000 euros que permite la ley de donaciones, ni de los paraísos fiscales. Solo tengo que decir que la ley está "pensada para el robagallinas, no para el gran defraudador", ¿dónde habré leído ésto?, es muy blanda con los ladrones de guante blanco y es tan lenta que siempre prescribe para estos chorizos o se les indulta en última instancia.


Este artículo tampoco trata sobre las tarjetas negras o black u opacas o secretas o irregulares o visas oro de las "cajas de ahorro" Caja Madrid y Bankia, ni de sus consejeros, ni de sus cajeros, ni de los gastos de representación o libre disposición, ni de los complementos retributivos, ni de los incentivos, ni si los gastos de una tarjeta se declaraban o no. Pero ¿qué necesidad tienen de tirar de estas tarjetas poniéndose ellos mismos los sueldos que se ponen?

Tampoco hablaré de los ciberataques a cajeros de todo el mundo, no a Blesa, Rato o Barcenas, que esos están blindados, sino a cajeros físicos de los que se han robado millones de euros en Europa, América y Asia.
Investigación criminal de Kaspersky Lab

Y tampoco comentaré los principales problemas de los cajeros de los ciudadanos corrientes y con preferentes, ni si no dan dinero, ni recibo, ni si se tragan la tarjeta, ni si cobran comisiones, ni si es mejor el dinero contante y sonante, o mejor los maletines de billetes de 500€ que son los que más circulan por España, en negro y en la economía sumergida.  ¿Serán estancos estos billetes para que no se mojen en agua?  No lo puedo decir porque aún no he tenido ninguno entre mis manos limpias.
Cuatro problemas con los cajeros automáticos, ¿cómo solucionarlos?


La retirada de un cajero

Este artículo trata de ayudar a calcular la retirada de un cajero, no por dimitir de sus cargos, ni por cesar al ex-director general de economía ni a los ex-consejeros de las cajas, ni por las jubilaciones doradas de las cajas, sino por saber cuántos billetes expenderá de cada clase si se retira efectivo.

Como si estuviéramos delante de un cajero y hubiéramos insertado en la ranura una tarjeta negra o dorada, introduciendo la cantidad a retirar en la celda E3 nos dirá cuántos billetes de cuántos euros, ¡pero no nos los dará!




Si se acaban los billetes de 500 € se pone un 0 en la celda C5, y lo mismo se puede hacer con las celdas marcadas en amarillo.

Mi contribución es la de la hoja "7 BILLETES" y me he inspirado en la hoja "5 BILLETES" que encontré en la web de Jesús Ferrer: Aplicaciones sencillas para Excel

No debemos olvidar los mortales, y nuestros hijos, que para retirar dinero en efectivo de los cajeros debemos tener saldo o crédito en la cuenta vinculada, y no hay que olvidar que cada día es más difícil cualquiera de esas dos cosas para las familias pobres en España.


Ventana en fecha y hora

Ventana en fecha y hora

Cuando se está construyendo una aplicación cliente-servidor, uno de los retos es el desarrollo de las ventanas de la aplicación cliente en fecha y hora, para que los testers dispongan de prototipos rápidos que les permitan asegurar que las ventadas de entradas-salidas cumplen con los requisitos del diseño funcional y del diseño técnico.

Los objetivos deben ser específicos, medibles, ambiciosos pero alcanzables y con un plazo de realización del objetivo adecuado y conocido por todos.

Cualquier objetivo planteado fija la fecha y hora de su cumplimiento y, como no todos los objetivos son iguales ni tienen establecida la misma fecha ni la misma hora, hace falta disponer de un calendario de fechas y horas donde estén marcados los objetivos a cumplir.  También es importante anotar las desviaciones de los objetivos y sus incumplimientos para aprender de la historia pasada, para mejorar el presente y preparar el futuro.

Calendario de fechas y horas

Para seguir y perseguir los objetivos definidos en los proyectos, los gestores de proyecto usan aplicaciones de software complejas y sofisticadas, como los Sistemas de Información para la Gestión de Proyectos (PMIS - Project Management Information System) y aplicaciones informáticas como MS-Project, pero también usan hojas de cálculo, como MS-Excel, o incluso calendarios en papel.

Aquí presento un calendario de fechas y horas escrito en Excel, que permite guardar y recuperar cualquier objetivo que queramos planificar en nuestros proyectos o los mismos objetivos de nuestra propia vida y de las generaciones futuras, pues recorre un rango desde el 1 de enero de 1.900 hasta el 31 de diciembre de 9.999, lo que permite planificar objetivos para más de 8.000 años, ¿es suficiente? porque Excel no da para más...

Especificaciones del calendario

En la primera ventana se puede ver el día y la hora actuales, en la segunda ventana se muestra el mes seleccionado y un reloj, y en la tercera ventana se ven las 24 horas del día seleccionado y las notas con los objetivos del día, que pueden ser recordatorios, aniversarios, planes de viajes o vacaciones, exámenes, o fechas de resolución o finalización marcadas en los proyectos en los que estemos involucrados.


Las especificaciones principales de este calendario de fecha y hora son:
  1. Calendario programado en Excel sin macros, excepto para la latencia de los segundos del reloj.
  2. Estilo y formato de la aplicación similar a Windows 7 pero con un calendario ampliado, ya que Windows lo limita al año 2099.
  3. Reloj de esfera con las manecillas de horas, minutos y segundos.
  4. Mes y día actuales.
  5. Selección de un año y un mes cualquiera.
  6. Barra de desplazamiento en el rango del mes 1 (enero de 1900) hasta el mes 97.200 (diciembre de 9999).
  7. Barra de desplazamiento en el rango del mes 1.201 (enero de 2000) hasta el mes 1.452 (diciembre de 2020).
  8. Barra de desplazamiento en el rango del mes 1.369 (enero de 2014) hasta el mes 1.380 (diciembre de 2014).
  9. Sincroniza el reloj con los servidores de Internet, por ejemplo: http://horaexacta.com.es
  10. Agenda de 24 horas desde el año 1900 hasta el año 2099, que no está incluida en el calendario de Windows.

Descarga del calendario de fecha y hora

Enlace para descargar la plantilla del Calendario de fecha y hora aquí:

Fecha y Hora PW41.rar 


En el fichero comprimido hay dos ficheros Excel:
  • Fecha y Hora PW41.xlsx sin macros y con 3 hojas visibles y una oculta:
    • Fecha y Hora: con el calendario de los meses y el reloj.
    • Reloj: para el cálculo de las manecillas de horas, minutos y segundos.
    • Agenda: con 73.050 filas, una por cada uno de los días de los años 1900 al 2099 y con 24 columnas con las notas de cada hora de cada día.
    • Hora: hoja oculta para sincronizar con un reloj de Internet.
  • Tempo-PW1.xls con una macro para actualizar el reloj cada segundo.
Para que las manecillas del reloj se muevan basta con actualizar la Excel o ejecutar la macro pulsando en el reloj.

Este calendario está probado en Excel 2010, solamente para no olvidar el día de mi cumpleaños que está cerca, y espero que sea de utilidad, de lo que me enteraré si recibo muchos comentarios.

Current positions

Current positions

Please find below all of our current vacancies. If there are no vacancies that fit you at the moment but you would like to be considered for future openings we invite you to apply and we will be happy to let you know when a suitable position becomes available.


Current Positions Template

The following template serves both for current positions for private employees and for excellent public and not so transparent public positions. Link to download this Current Positions template here:

Puestos Corrientes PW2.xlsx 


This Current Positions template help to:
  • The HR directors or employees of private companies.
  • The controllers of the public servants.
  • Teachers to place students in the classroom.
  • Project managers to locate and position their groups of collaborators.
  • Organizers of wedding, receptions, meetings and events.
  • Captains of ships and submarines to assign cabins to commanders and troop.
  • Parents of large families to order their children's bedrooms.
  • Monitors of free time schools and not so free.
  • Managers and staff templates of related jobs.
  • The preparation and updating of organization charts.
  • Implementing a system of quality management of human resources management.
  • Occupation of parliamentary seats.
The sample data template are purely speculative and have no connection with reality, which is always stranger than fiction and imagination. Due to the lack of transparency in public administrations and Spanish electric companies, I can not ensure that the data used as an example of employees are true and real and must to be cleared before using this Current Positions template.

To find the position occupied or unoccupied must include the full name of an employee or unemployed selecting it from the dropdown in the cells of the "Puestos" worksheet. The hyperlink to each position is in column B with the positions of the "Empleados" sheet and in cell J8 of the sheet "Perfil". Following the link leads to the position occupied by the employee simply calculated using Excel functions, not macros or VBA.

In the Manager Names has been defined: Puestos =Puestos!$A$1:$Z$50

With 12 rows of tables and 3 benches of 12 seats in each row, for a total of 432 positions to fill, which can be reduced or increased depending on the size of the office or banquet. If any employee has the empty column B in the worksheet "Empleados" is that it is not placed on the sheet "Puestos".

Template description

Sheet "Empleados"

  • Empleado: Name of employees.
  • Puesto: Position composed with an array formula and a dynamic link to the sheet "Puestos".
    • {=SI.ERROR(HIPERVINCULO("[Puestos Corrientes PW1.xlsx]Puestos!" & DIRECCION(MAX((Puestos=[@Empleados])*FILA(Puestos));MAX((Puestos=[@Empleados])*COLUMNA(Puestos)));[@Empleados]);"")}
    • Administrador de Nombres: Puestos=Puestos!$A$1:$Z$50

    Sheet "Puestos"

    • Position of each table.
    • Dynamic list with data validation form the "Puestos" sheet.
      • ListaEmpleados=DESREF(Empleados!$A$2; 0; 0; CONTARA(Empleados!$A:$A) - 1)
    • Conditional formatting rule appliedf to the range: $A$1:$Z$50
      • =Y(CELDA("fila")=FILA();CELDA("columna")=COLUMNA())
      • Detection of dupplicated positions, marked in red: =CONTAR.SI(Puestos;A1)>1

      Sheet "Perfil"

      • Profile with resume position.
      • Cell G5 with the position to select the profile.
      • Archive name detection:
        • NombreArchivo=CELDA("nombrearchivo")
        • HojaPuestos=EXTRAE(NombreArchivo;ENCONTRAR("[";NombreArchivo);ENCONTRAR("]";NombreArchivo)-ENCONTRAR("[";NombreArchivo)+1)&"Puestos!"
      • The hyperlink formula leading to the occupied position in the sheet "Puestos" from cell J8 of sheet "Perfil" and is the "alma mater" of this contribution (that is an array formula so must be entered simultaneously pressing Ctrl + Shift + Enter keys)
      =SI.ERROR(HIPERVINCULO(HojaPuestos & DIRECCION(MAX((Puestos=$G$5)*FILA(Puestos));MAX((Puestos=$G$5)*COLUMNA(Puestos)));$G$5);"")

      Sheet "Sueldos"

      • Dynamic table with the occupied positions by employees from each company.
      • Gross annual salary.
      • Months in office.
      • Years old.
      • Years of experience.

      Sheet "Referencias"

      • Web pages with information from Excel and the data used to make this Current Positions template.

      All sheets can be checked without password and although the data are taken from public reference, can not ensure that they are confidential and are protected if no receipt notice against.

      Happy Holidays and New Year 2014 from

      Pedro Wave

      Puestos corrientes

      Historia de la corriente eléctrica

      La corriente eléctrica no tiene nada de corriente ya que la humanidad la intenta controlar desde hace poco más de 200 años.

      Con la generación, transporte y transformación de la energía eléctrica se ha producido una gran revolución de la industria, el transporte, las comunicaciones y el conocimiento, y se han creado muchos puestos de trabajo de empleados eléctricos, tanto ingenieros como investigadores, técnicos o comerciales, además de crear puestos de asesores, consultores, directivos o políticos, todos ellos retribuidos cuando los consumidores de la corriente eléctrica pagan sus facturas eléctricas.

      Factura eléctrica

      Este traspaso de la corriente eléctrica deshincha las cuentas corrientes de los consumidores de la luz e hincha las cuentas no tan corrientes de algunos puestos, puestos por enchufe no tan eléctrico, que son los que marcan las subidas del precio de la luz. No vamos a comentar las propuestas de los ¿reguladores? del mercado eléctrico ni las decisiones de los viernes del Consejo de Ministros, que se pueden ver en las noticias o en el siguiente enlace:
      http://estaticos.expansion.com/opinion/documentosWeb/2013/12/26/Propuesta_26122013_.pdf

      Lo que si podemos hacer es investigar los puestos, puestos a dedo con enchufe, sin dar calambres aún metiendo todos los dedos y las dos manos en el enchufe, pero que hacen subir en rampa (sin que les dan rampazos) sus cuentas corrientes y no tan corrientes y la factura eléctrica con la que se pagan sus sueldos y emolumentos.



      Plantilla de Puestos Corrientes

      La siguiente plantilla sirve tanto para los puestos corrientes de los empleados privados como para los excelentes puestos públicos y no tan públicos ni transparentes.  Enlace para descargar la plantilla de Puestos Corrientes aquí:

      Puestos Corrientes PW2.xlsx 


      Esta plantilla de Puestos Corrientes ayudará a:
      • Los directores o empleados de RRHH de las empresas privadas.
      • Los controladores de los empleados y/o funcionarios públicos.
      • Los profesores para situar a sus alumnos en el aula.
      • Los jefes de proyecto para localizar y posicionar a sus grupos de colaboradores.
      • Los organizadores de banquetes de bodas, eventos y reuniones.
      • Los capitanes de barcos y submarinos para asignar los camarotes de los mandos y de la tropa.
      • Los padres de familias numerosas para ordenar los dormitorios de sus hijos.
      • Los monitores de escuelas de tiempo libre y no tan libre.
      • Los gestores de plantillas de personal y RPT - relación de puestos de trabajo.
      • La confección y actualización de los organigramas de la organización.
      • La implantación de un sistema de gestión de la calidad de la gestión de recursos humanos.
      • La ocupación de los escaños parlamentarios.

      Los datos de ejemplo de la plantilla son meramente especulativos y no guardan relación alguna con la realidad, que siempre supera a la ficción e imaginación. Debido a la poca transparencia de las administraciones y sociedades públicas y/o eléctricas españolas no se puede asegurar que los datos empleados como ejemplo de empleados sean ciertos y verdaderos y se deben borrar antes de usar esta plantilla de Puestos Corrientes.

      Para encontrar el puesto ocupado o desocupado se debe incluir el nombre completo de un empleado o desempleado seleccionándolo en el desplegable de una mesa de la hoja "Puestos". El hiperenlace a cada puesto se encuentra en la columna B con los puestos de la hoja de "Empleados" y en la celda J8 de la hoja de "Perfil".  Siguiendo el enlace lleva a la mesa ocupada por el empleado, calculada simplemente con funciones de Excel, sin macros ni VBA.

      En el Administrador de Nombres se ha definido Puestos =Puestos!$A$1:$Z$50
      Con 12 filas de mesas y 3 bancadas de 12 puestos en cada fila, hacen un total de 432 puestos a ocupar, que se pueden reducir o aumentar según sea el tamaño de la oficina o del banquete. Si algún empleado tiene la columna B vacía en la hoja "Empleados" es que no se encuentra colocado en la hoja "Puestos".

      Descripción de la plantilla

      Hoja "Empleados"

      • Empleado: Nombre y apellidos de los empleados.
      • Puesto: Compuesto con una fórmula matricial y un enlace dinámico a la hoja "Puestos".
        • {=SI.ERROR(HIPERVINCULO("[Puestos Corrientes PW1.xlsx]Puestos!" & DIRECCION(MAX((Puestos=[@Empleados])*FILA(Puestos));MAX((Puestos=[@Empleados])*COLUMNA(Puestos)));[@Empleados]);"")}
        • Administrador de Nombres: Puestos=Puestos!$A$1:$Z$50
      • Puesto anterior.
      • Cargo.
      • Empresa.
      • Entrada: Fecha de incorporación al puesto.
      • Salida: fecha de salida del puesto.
      • Meses en el cargo: 
        • =SI(ESNUMERO([@Entrada]);SIFECHA([@Entrada];SI(ESNUMERO([@Salida]);[Salida];HOY());"m");"")
      • Años de antigüedad:
        • =SI(ESNUMERO([@[Meses cargo]]);[@[Meses cargo]]/12;"")
      • Bruto anual: Sueldo bruto anual sin comisiones ni complementos ni sobres.
      • Ingresado: Importe total ingresado en la cuenta corriente en el tiempo que lleva en el cargo.
      • Partido: Si está partido o si está entero o si es bipartidista.
      • Nacimiento: Fecha de nacimiento declarada o estimada.
      • Edad: Edad calculada.
        • =SI(ESNUMERO([@Nacimiento]);SIFECHA([@Nacimiento];HOY();"y");"")
      • Correo: Desconocido.
      • Teléfono: Desconocido.
      • Móvil: Desconocido.
      • Dirección: Desconocida.
      • BORME (Boletín Oficial del Registro Mercantil): Enlace a datos públicos.
      • Ultima fila con los valores promedio de:
        • Meses en el cargo.
        • Años de antigüedad.
        • Sueldo bruto anual.
        • Total ingresado en la cuenta corriente.
        • Edad.

      Hoja "Puestos"

      • Con la mesa de cada puesto.
      • Sin despachos (se pueden dibujar posteriormente)
      • Lista dinámica en la validación de datos de la hoja "Puestos".
        • ListaEmpleados=DESREF(Empleados!$A$2; 0; 0; CONTARA(Empleados!$A:$A) - 1)
      • Regla de formato condicional aplicada al rango: $A$1:$Z$50
        • =Y(CELDA("fila")=FILA();CELDA("columna")=COLUMNA())
        • Detección de los puestos duplicados, marcados en rojo con: =CONTAR.SI(Puestos;A1)>1

        Hoja "Perfil"

        • Perfil con el resumen de cada puesto.
        • Celda G5 con la lista desplegable de los puestos para seleccionar el perfil.
        • Detección del nombre del archivo por si se cambia con los nombres:
          • NombreArchivo=CELDA("nombrearchivo")
          • HojaPuestos=EXTRAE(NombreArchivo;ENCONTRAR("[";NombreArchivo);ENCONTRAR("]";NombreArchivo)-ENCONTRAR("[";NombreArchivo)+1)&"Puestos!"
        • La fórmula con el hipervínculo que lleva al puesto ocupado en la hoja "Puestos" desde la celda J8 de la hoja "Perfil" y que es el "alma mater" de este aporte (es una fórmula matricial por lo que se debe introducir presionando a la vez las teclas Ctrl + Shift + Enter)
          • =SI.ERROR(HIPERVINCULO(HojaPuestos & DIRECCION(MAX((Puestos=$G$5)*FILA(Puestos));MAX((Puestos=$G$5)*COLUMNA(Puestos)));$G$5);"")

        Hoja "Sueldos"

        • Hoja dinámica con los puestos ocupados por empleados distribuidos en cada empresa.
        • Sueldo anual bruto.
        • Meses en el cargo.
        • Años de antigüedad.
        • Años de experiencia.

        Hoja "Referencias"

        • Páginas Web con la información de Excel y los datos empleados para confeccionar esta plantilla de Puestos Corrientes.

        Todas las hojas se pueden desproteger sin contraseña y aunque los datos se han extraído de referencias públicas, no puedo asegurar que sean confidenciales y estén protegidos si no recibo aviso en contra.

        Felices fiestas consumistas de energía eléctrica y que podamos seguir pagando la subida de la luz el próximo año nuevo, os desea
        Pedro Wave

        How to Paint in Excel

        Virtual artworks

        No need to use specialized software to create Digital art, with programs like Paint or Excel you can be an artist, as discussed in this article.

        The first time a computer was used to paint was before 1959 in a military center with a computer that cost $238 million to the Cold War budget, within the SAGE: Semi-Automatic Ground Environment project created by MIT and IBM.

        An anonymous military artist (no surprise) managed to paint in a 19" graphic display, programming it with punch cards, a vector drawing of a silver screen pinup scantily dressed, copied from a 1956 calendar. You can read the complete story here.

        The Never-Before-Told Story of the World's First Computer Art (It's a Sexy Pin-Up)




        In this image generated with my paint program in Excel, which can be downloaded below, the original image is in black and white, as you might expect, and the flesh and bone one was from the calendar that was copied.

        Today anyone with vector programs can create art on a computer or in the cloud or even create art objects and characters in 3D environments within a virtual world as Second Life, for example.

        What is more difficult is to find artists who use programs like Paint or Excel to create his artworks, but there are people painting on them. For example those which can be seen on this page.  Digital Art Made with Excel Spreadsheets

        A retired Japanese artist has made some drawings using AutoShapes included in Excel that can be downloaded from these links:
        http://www.moug.net/img/campaign/2006/a1.zip
        http://www.moug.net/img/campaign/2006/a2.zip
        (8 art prints can be downloaded fully painted in Excel, just by changing the file name to download: a1.zip to a8.zip)

        How to paint with Excel

        The initial idea is to use each cell in Excel as a pixel of the image and change its color to create a drawing. The problem is you have to scroll through and select each of the cells you want to change its fill color as explained by Microsoft to highlight cells.

        Another way is to give values ​​to cells that represent a color and create rules of conditional formatting to change their color depending on their values​​, which is laborious and does not leave a lot of artistic freedom.

        The solution came to me when I read this interesting and excellent blog: Option Explicit VBA
        How to Create a Rollover Effect in Excel: Execute a Macro When Your Mouse is over a Cell


        Cursor Rollover o Mouseover effect

        When the mouse moves over the cells can not produce any effect, you must select a cell to change its properties.

        This has totally changed since Jordan Goldmeier published on April 9th, in 2011, an article in his original blog allowing to change cell properties moving the mouse cursor over them.

        OPTION EXPLICIT VBA Blog - Rollover Effect

        He had the idea participating in the blog of our beloved Chandoo, Excel guru, who published two articles with which you can learn this awesome technique effect:
        Chandoo.org - Beam Me Up Scotty – Excel Hyperlinks
        Chandoo.org - Interactive Dashboard in Excel using Hyperlinks

        Program to paint in Excel

        Based on Rollover or Mouseover effect I designed and developed a Painter in Excel as a digital drawing block inspired by the program Paint from Windows but slightly more limited, to create pixelated images in bitmap format known as bitmap, raster graphic images or contones (continuous tones), in which is stored the color of each cell in Excel, as a bit or pixel being represented by a cell in a particular row and column of the worksheet.

        This program contains two sheets, Pintor (Painter) to draw and Idiomas​​ (Languages) with the translations of the texts into English and Spanish, as usual in my blog templates.

        The Painter sheet zoom is preset to 200% to make it easier to edit images, requiring lower it to 50% to get the correct size of the pixels in the bitmaps generated with this program.

        In the image area named Lienzo (Painting) the column width is 0.17 and the row height is 2, so that the cells are squares with sides of 0.05 cms.

        Several sections have been defined to handle this drawing and painting program:
        • Zoom - To change the zoom of the image with 3 buttons: Zoom in, Zoom out and 200% default zoom. At all times is shown the zoom and you can edit the name of the image that will be the file name when saving the image.
        • Show or hide - You can show or hide the horizontal and vertical rulers, the cell formulas, image grid, the titles of the rows and columns of the sheet, the status bar and horizontal scroll bar and vertical and the worksheets.
        • Screen- To switch to full screen.
        • Clipboard - Allows you to copy and paste selected ranges of the image and save the image or selection to a file in four popular image formats: BMP, GIF, JPG or PNG.
        • Image - To select or clear all. A box shows the coordinates of the cell that mouse hover is above and, if you select this box (appearing "Fill color with solid"), will be fill continuous brush and block rectangles.
        • Forms - To choose the way in which three possible drawing. Brush drawing a freehand line (continuous or discontinuous) that draws solid lines from one point to another; Blocks draws rectangles, filled or not depending on being marked as "Fill color with solid".
        • Colors - To change the color of the brushes exchanging two colors: Color 1, activated with the left mouse button, Color 2, activated with the right mouse button. After selecting one of the two colors, you can change its color with the rainbow-like mosaic of the right or the button to "Edit Colors" that opens the window to choose the background color fill format cells. You can not choose fill effects and frame styles and colors.
        • Button to change language - It is painted in yellow and you can switch between English and Spanish texts of this painter.

        Rollover or Mouseover function

        When you move the cursor over the painter, in the Imagen section appears this dynamic text:

        Row=136 / Column=111

        with row and column that the mouse cursor rollover, is when the called Rollover or Mouseover effect, because the function that causes it is running because the cell that contains a call is passed within a HYPERLINK function to the MouseOver function:



        This function controls that it is called once only for each cell rolloved and if Pincel (Brush) is selected to draw freehand. If the line is continuous the function calls the PintarRayas subroutine, which fills the cells for which no effect is activated mouseover, and if the line is discontinuous changes the color of a single cell with the PintarCelda subroutine.

        When not enabled cell filling, always reported point or cell that is passing the mouse over it.

        Painter Download

        Download the template for free, with macros visibles and worksheets not password protected, this images painter from this link and enable macros to use it:



        Download the zip file and run the Pintor_PW10.xlsm file to see the Mouseover effect moving and the full colors palette painting. With the Pintor_PW10.xls file, executed in compatibility mode in Excel 2007 and 2010, you can see this effect but does not save the full colors palette. It is tested on Excel 2007 and 2010 versions, so I can not ensure it works in Excel 2003 or Excel 2013.

        Como pintar con Excel

        Obras de arte virtuales

        No hace falta usar programas especializados para crear arte digital, con programas como Paint o Excel se puede ser un artista, como veremos en este artículo.

        La primera vez que se uso un ordenador para pintar fue antes de 1959 en un centro militar con un ordenador que costó 238 millones de dólares al presupuesto de la Guerra Fría, dentro del proyecto SAGE: Semi-Automatic Ground Environment, creado por el MIT e IBM.

        Un artista militar anónimo (no es de extrañar) logró pintar en un display gráfico de 19", programándolo con tarjetas perforadas, un dibujo vectorial de una chica pin-up ligerica de ropa, copiada de un calendario de 1956.  La historia completa puedes leerla aquí.

        The Never-Before-Told Story of the World's First Computer Art (It's a Sexy Pin-Up)




        En esta imagen generada con mi programa para pintar en Excel, que puedes descargar más abajo, la imagen original está en blanco y negro, como puedes suponer, y la de carne y hueso era la del calendario del que se copió.

        Hoy en día cualquiera que disponga de programas vectoriales puede crear arte en un ordenador o en la nube o incluso crear objetos y personajes artísticos en escenarios creados en 3D dentro del mundo virtual Second Life, por ejemplo.

        Lo que ya es más difícil es encontrar artistas que usen programas como Paint o Excel para realizar sus obras de arte, pero haberlos, haylos.  Por ejemplo los que se pueden ver en esta página.  Creando obras de arte con Excel y Paint

        Un jubilado japonés ha realizado unos dibujos artísticos con el uso de las autoformas incluidas en Excel que se pueden descargar en estos enlaces:
        http://www.moug.net/img/campaign/2006/a1.zip
        http://www.moug.net/img/campaign/2006/a2.zip

        (Se pueden bajar 8 cuadros artísticos totalmente pintados en Excel, con sólo cambiar el nombre del fichero a descargar: a1.zip a a8.zip)

        Como pintar con Excel

        La ídea inicial es usar cada celda de Excel como un pixel de la imagen y cambiar su color para crear un dibujo.  El problema es que hay que desplazarse y seleccionar cada una de las celdas a las que se quiera cambiar su color de relleno como explican los de Microsoft para Resaltar celdas aquí.

        Otra forma es dar valores a las celdas que representen un color y crear reglas de formato condicional para cambiar su color dependiendo de sus valores, lo que es muy laborioso y no deja mucha libertad artística.

        La solución llegó cuando leí este interesante y excelente artículo en el blog Option Explicit VBA:
        How to Create a Rollover Effect in Excel: Execute a Macro When Your Mouse is over a Cell


        Efecto cursor Rollover o Mouseover

        Cuando el ratón se desplaza por encima de las celdas no se produce ningún efecto, hay que seleccionar una celda para poder cambiar sus propiedades.

        Esto ha cambiado desde que Jordan Goldmeier publicó el 9 de abril de 2011 un artículo en su blog original que permitía cambiar propiedades de celdas pasando el cursor por encima de ellas.

        OPTION EXPLICIT VBA Blog - Efecto Rollover

        El tuvo la idea participando en el blog de nuestro admirado Chandoo, gurú de Excel, que publicó dos artículos con los que se puede aprender esta técnica:
        Chandoo.org - Beam Me Up Scotty – Excel Hyperlinks
        Chandoo.org - Interactive Dashboard in Excel using Hyperlinks

        Programa para pintar en Excel

        Basado en el efecto Rollover o Mouseover he diseñado y desarrollado un Pintor en Excel, como un bloc de dibujo digital inspirado en el programa Paint de Windows pero un poco más limitado, para crear imágenes pixeladas en un mapa de bits, conocido como formato bitmap, rasterizado o calcado, en el que se almacena el color de cada celda en Excel, siendo un bit o pixel representado por una celda en una determinada fila y columna de la hoja de cálculo.

        Este programa contiene dos hojas, Pintor para dibujar e Idiomas con las traducciones de los textos al inglés y al español, como es habitual en las plantillas de este blog.

        El zoom de la hoja Pintor está preseleccionado al 200% para que sea más fácil editar las imágenes, siendo necesario bajarlo al 50% para obtener el tamaño correcto de los pixeles en los bitmaps generados con este programa.

        En la zona de la imagen, nombrada Lienzo, el ancho de las columnas es de 0,17 y el alto de las filas es de 2, con lo que las celdas son cuadradas de 0,05 cms. de lado.

        Se han definido varias secciones para manejar este programa de dibujo y pintura:
        • Zoom - Para modificar el zoom de la imagen con 3 botones: Acercar, Alejar y el zoom por defecto del 200%.  En todo momento se muestra el valor del zoom y se puede editar el nombre de la imagen que será el nombre del fichero cuando se guarde la imagen.
        • Mostrar u ocultar - Se pueden mostrar u ocultar las reglas vertical y horizontal, las fórmulas de las celdas, la cuadrícula de la imagen, los títulos de las filas y columnas de la hoja, la barra de estado y las barras de desplazamiento horizontal y vertical y las hojas del libro.
        • Pantalla - Para conmutar a pantalla completa.
        • Portapapeles - Permite copiar y pegar rangos seleccionados de la imagen y guardar la imagen o la selección en un fichero en 4 formatos de imagen: BMP, GIF, JPG o PNG.
        • Imagen - Para seleccionar o borrar todo.  En un recuadro se muestran las coordenadas de la celda por la que pasa el cursor por encima y, si se selecciona ese recuadro (apareciendo "Rellenar con color sólido"), hará que la forma Pincel sea continua y la forma Bloques rellene los rectángulos de color.
        • Formas - Para elegir la forma con la que dibujar entre tres posibles. Pincel que dibuja una línea a mano alzada (continua o discontinua); Líneas que dibuja líneas continuas de un punto a otro; Bloques que dibuja rectángulos, rellenos o no dependiendo de que se esté marcando como "Rellenar con color sólido".
        • Colores - Para cambiar el color de los pinceles intercambiando dos colores: Color 1, activado con el botón izquierdo del ratón; Color 2, activado con el botón derecho del ratón.  Una vez seleccionado uno de los dos colores, se puede cambiar su color con el mosaico del tipo arco iris de su derecha o con el botón para "Editar colores" que abre la ventana para elegir el color de fondo de relleno del formato de celdas.  No se pueden elegir efectos de relleno ni estilos ni colores de trama.
        • Botón para cambiar de idioma - Está pintado en fondo amarillo y se puede cambiar entre el inglés y el español los textos de este pintor.

        Función Rollover o Mouseover

        Cuando se mueve el cursor por el lienzo de la imagen y aparece en la sección Imagen el texto dinámico:

        Fila=136 / Columna=111

        con la fila y la columna por la que pasa por encima el ratón, es cuando se produce el denominado efecto Rollover o Mouseover, porque se está ejecutando la función que lo provoca debido a que la celda por la que se pasa contiene una llamada dentro de una función HIPERVINCULO a la función MouseOver:



        En esta función se controla que solo se llame una vez por cada paso por encima de una celda y que se ha seleccionado la forma Pincel para dibujar a mano alzada.  Si el trazo es continuo se llama a la rutina PintarRayas, que rellena las celdas para las que no se ha activado el efecto mouseover, y si el trazo es discontinuo se cambia el color de una única celda con la rutina PintarCelda.

        Cuando no está activado el relleno de las celdas siempre se informa del punto o celda por la que está pasando el ratón por encima.

        Descarga del Pintor

        Descarga la plantilla totalmente gratuita, con las macros visibles y las hojas protegidas sin contraseña, de este Pintor de Imágenes desde este enlace y habilita las macros para usarlo:



        Descarga el fichero comprimido y ejecuta el fichero Pintor_PW10.xlsm para ver en movimiento el efecto Mouseover y la paleta completa de colores. El fichero Pintor_PW10.xls ejecutado en modo de compatibilidad en Excel 2007 y 2010 permite ver ese efecto pero no guarda la paleta completa de colores. Está probado en las versiones de Excel 2007 y 2010, por lo que no puedo asegurar que funcione en Excel 2003 ni en Excel 2013.

        Mi Lista de Blogs- My Blog List