Format date pour ma textbox

Résolu
mchotard Messages postés 474 Date d'inscription   Statut Membre Dernière intervention   -  
mchotard Messages postés 474 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour
que faut-il ajouter à ma macro ci-dessous pour pour que ma textbox soit bien au format date courte à savoir 15/01/2012. La date d'affiche bien mais je n'ai pas l'impression qu'elle soit dans le bon format car je ne peux l'utiliser faire une autre calcul d'âge par exemple

Private Sub UserForm_Activate()
TextBox21.Value = Date
End Sub

Merci

3 réponses

  1. JCB40 Messages postés 3058 Date d'inscription   Statut Membre Dernière intervention   479
     
    Bonjour
    A tester
    Private Sub UserForm_Activate()
    Me.TextBox21 = Format(DateValue(Me.TextBox21) , "dd/mm/yyyy")
    End Sub
    Crdlt
    0
  2. mchotard Messages postés 474 Date d'inscription   Statut Membre Dernière intervention   44
     
    merci pour ton aide, mais cela ne fonctionne pas j'ai le message suivant : Erreur de compilation, nombre d'arguments ou affectation de propriété incorrecte.
    A suivre
    Merci
    0