Userform

Estando en el Editor, hacé clic derecho en la barra de herramientas que tendrás a la vista y optá por controles adicionales. Allí buscá el Calendar (la versión dependerá de tu versión Excel) y dibujalo en tu form.
Doble clic sobre el control y esta es su rutina:
Private Sub Calendar1_Click()
textbox1 = calendar1.value
End Sub
ESto es para que te guarde en un control Textbox la fecha seleccionada.
También podes establecer a la apertura del Userform, que siempre te muestre la fecha del día, y luego solo tomes este valor (sin la rutina del Calendar_Click):
Private Sub UserForm_Initialize()
Calendar1.Value = Date
End Sub
en otra rutina, agregarás esta línea : Textbox1 = Calendar1.value
Saludos
Elsa
** Todo sobre Userforms desde:
http://es.geocities.com/lacibelesdepunilla/manuales

Ante todo gracias, por la yuda, como hago para que solo aparezca el calendar cuando estoy pidiendo la fecha, es decir cuando se abre el useform no aparece, si me ubico en el textbox de fecha aparezca, seleccione la fecha y desaparezca.
Gracias