Calendrier qui remplit deux textbox

Bonjour,
Je reviens sur le forum .... vous me manquez !!
Ma question est simple, je travaille avec un calendrier et j'aimerai qu'il incrémente deux textbox, la première remplit la date (format DDDD DD MMMM ), la deuxième textbox doit remplir la même date mais ne doit afficher que le jour (DDDD).
Existe t'il un moyen d'y parvenir ??
Pour info, je vous donne le code :

Private sub calendrier()
livraison.value = format (calendrier.value, 'dddd dd mmmm')
ladate = livraison.value
calendrier.visible=true

copie.value = format (calendrier.value, 'dddd')
ladate = copie.value
calendrier.visible=true

livraison.set.focus

Merci pour votre aide et bonne journée