Dans un UserForm, j'ai une TextBox dans laquelle je saisie une date avec le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub TextBox3_Change()
    TextBox3.MaxLength = 10
    Valeur = Len(TextBox3)
    If Valeur = 2 Or Valeur = 5 Then TextBox3 = TextBox3 & "/"
    If Len(TextBox3) = 10 And Not IsDate(TextBox3) Then TextBox3 = ""
    Range("B13").Value = TextBox3
End Sub
Comme vous pouvez le voir, je recupere la date saisie pour la copier dans une cellule de la feuille Excel

La date est saisie au format jj/mm/aa

Et je voudrais qu'elle soit affiché au format au format jj/mm/aaaa dans la cellule où elle est copiée

J'ai regardé un peu partout dans le forum, plein de post parle du sujet mais j'y ai pas trouvé de solution



Au passage petite question autre pour le format date, je vooudrais un peu la même chose avec un format nombre (simplement un espace entre les milliés et les centaines



Peut un petit code au niveau des cellules et sufisant