Modifica codice per inserimento date con calendario

[magomerlino]

In excel 2007 ho crearo una macro per inserire le date nella cella excel
mediante un calendario come in Access 2007.
Seleziona la cella excel, tasto CTRL+Z e compare il calendario, doppioclicco
sul numero del giorno ed inserisco
la data nella cella selezionata. A questo punto devo chiudere il calendario
altrimenti non posso selezinare u'altra cella per un nuovo inserimento.
Quesito: si potrebbe modificare il codice in modo da tenere sempre aperto
il calendario e consentire cmq l'inserimento delle date
che significa non digitare ogni volta CTRL+Z, quindi evitare di aprire e
chiudere, aprire e chiudere, .....

Il codice nella UserForm1 �:
Private Sub Calendar1_Click()
ActiveCell.Value = Me.Calendar1.Value
End Sub

Il codice nel modulo1 �:
Public Sub m()
UserForm1.Show
End Sub

E' possibile rinominare la UserForm in "Calendario"?
Il file excel cmq � a questo indirizzo:
http://cid-4e8529db43cfa3a4.skydrive.live.com/browse.aspx/Merlino?uc=1

Grazie!