Leyendo el Calendario automático de mi amigo [uSER=46507]@Macro Antonio[/uSER] se me ha ocurrido preparar un Control de Calendario desplegable con fórmulas en Excel 2010 y lo comparto con vosotros por si lo queréis probar en Excel 2013 que aún no lo tengo instalado.
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.
Se puede cambiar el rango seleccionado en esta rutina:
Sub ControlCalVisible(bVisible As Boolean)
'
' Al seleccionar una celda se chequea la visibilidad del Control.
'
With ActiveSheet.Shapes.Range(Array("ControlCal"))
'If Not Application.Intersect(ActiveCell, ActiveSheet.Range("B:C")) Is Nothing
If UCase(ActiveSheet.Cells(1, ActiveCell.Column)) Like "*FECHA*" Or _
bVisible Then 'Condición para mostrar el Control
[/CODE]
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 acontecimientos o días festivos se escogen en la hoja "CalFechas".
Si te gusta o te sirve para algo dímelo y te lo agradeceré.
Si no te gusta o no te sirve y me lo dices me servirá para mejorarlo o si no, puedes callar para siempre.
Leyendo el Calendario automático de mi amigo [uSER=46507]@Macro Antonio[/uSER] se me ha ocurrido preparar un Control de Calendario desplegable con fórmulas en Excel 2010 y lo comparto con vosotros por si lo queréis probar en Excel 2013 que aún no lo tengo instalado.
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.
Se puede cambiar el rango seleccionado en esta rutina:
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 acontecimientos o días festivos se escogen en la hoja "CalFechas".
Si te gusta o te sirve para algo dímelo y te lo agradeceré.
Si no te gusta o no te sirve y me lo dices me servirá para mejorarlo o si no, puedes callar para siempre.
[/size]
Control de Calendario PW1.rar