XL 2010 Format date longue dans Textbox

Bonjour à vous tous
Alors voici mon pr, dans un USF de recherche et modification , j'ai un Txt Date lorsque je recherche une ligne, dans ce Txt Date, j'aimerais changer la date, mais, lorsque je valide, le format et 06/06/2016, et j'aimerais le format mardi,16 Février 2016.

Voici la ligne de code

Private Sub B_validation_Click()
'--- Transfert Formulaire dans BD
Sheets("Les payements").Cells(ligne, 2) = Application.Proper(Me!Nom)
Sheets("Les payements").Cells(ligne, 3) = Me.TextDate
End sub

Merci à bientôt