Ola Srsª.

Estou iniciando uma planilha no Excel 2010 onde estou utilizando o calendário deste link:
http://guiadoexcel.com.br/calendario-no-excel-2010
sugerido pelo companheiro Patropi em outro tópico do fórum, conforme o link:
viewtopic.php?f=10&t=12150&p=63697&#p63697
Tentei utilizar o calendário em questão para que quando eu selecionasse uma data o mesmo inserisse em uma caixa de texto dentro de um userform. mais a caixa de texto fica vazia.
De inicio O projeto ficaria mais ou menos assim:
uma base de dados.
uma userframe contendo um botão e uma caixa de texto
Rotina
Ao dar duploclick na caixa de texto abrira o calendário em questão.
Ao selecionar a data o valor será incluído na caixa de texto.
Depois de ter preenchido outros campo clico no botão Enviar e o mesmo é enviado para base.

Segue em anexo ex. do desejado

Minha duvida inicial esta na planilha "Cad. Despesas" Botão Transportes.
VBA
Userform9
textbox1

Obrigado