Calendar

Claro que sirve para algo. Puedes usar los eventos del calendario para hacer cosas. Por ejemplo, pega lo siguiente en el módulo de la hoja que tiene el calendario (click derecho sobre su etiqueta->Ver código):

Private Sub Calendar1_Click()
If Calendar1.Value = DateValue("31-12-2003") Then MsgBox "Feliz año 2004"
End Sub

Private Sub Calendar1_NewMonth()
MsgBox "Has cambiado de mes"
End Sub

Private Sub Calendar1_NewYear()
MsgBox "Has cambiado de año"
End Sub

Y luego haz algunas pruebas. Si seleccionas el día 31/12/2003, el calendario te deseará feliz año 2004 :-)
Un saludo.


Fernando Arroyo
MS MVP - Excel

"Andrés Farias" <andresfariasARROBAmsnPUNTOcom> escribió en el mensaje news:

Menu Insertar > Objeto > Control calendar ver xx
Muy bonito, pero ¿sirve para algo? ¿como se puede aplicar funcionalididad a
ciertos días para que ejecuten "algo" al momento de seleccionarlos?
Tengo algunos libros que trabajan con muchas fechas y me gustaría
incorporarlo en ellos, pero no se como hacerlo.

Gracias

Andrés Farias.cl