Format de date dans textbox

Bonjour à toutes et tous

j'ai un petit problème de format sur l'affichage de date dans mes Textboxs.

Problème pour un bidouilleur comme moi , mais probablement pas pour un féru d'Excel.

Donc, je disais, je me suis bidouillé un trombinoscope familial dont la Base comporte deux colonnes (2 et 4) de dates en format cellules "mercredi 16 mars 1952". Je souhaiterais garder ce format en affichage dans mes textboxs d'UserForm lors de son usage. Actuellement mes textboxs n'affichent que " 16 mars 1952".

ci joint mon fichier expurgé de données personnelles

Merci par avance et joyeux noêl.

Bonjour

A tester avec les dates Nais et Décés en Date longue

Bonjour M12 et grand merci pour votre aide, c'est exactement ce que je voulais...

Mais comme j'aime bien comprendre, pourriez vous me dire ce que vous avez changer dans le code pour pouvoir l'utiliser éventuellement sur d'autres fichiers ?

Encore merci.

Re,

Regarde la ligne 5 qui a été ajoutée dans le code

Elle précise que si le TextBox & i est égal à 2 ou 4, on change le format

Private Sub ListBox1_Click()
  For i = 1 To NbCol
    tmp = Me.ListBox1.Column(i - 1)
    If Not IsError(tmp) Then Me("textbox" & i) = tmp
    If i = 2 Or i = 4 Then Me("textbox" & i).Value = Format(Me("textbox" & i).Value, "dddd dd mmmm yyyy")
  Next i
  Me.Enreg = Me.ListBox1.Column(NbCol)

.../...

Grand Merci M12, cela va me servir pour bien d'autres fois...