Discussion :

[perchman]

Bonjour à tous,

j'ai un problème (mais ça, c'est normal: sinon, je ne posterai pas)...

voilà, j'ai 3 combobox qui me permettent d'entrer la date de naissance d'un élève (1 combo pour le jour, 1 pour le mois et 1 pour l'année)

ensuite, je les "assemble" sous cette forme:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
    Dim date_naissance As String
    date_naissance = CBB_modif_jour & CBB_modif_mois & CBB_modif_annee
    Worksheets("liste des élèves").Cells(ligne_eleve, 3) = date_naissance

et sous Excel, je l'affiche comme ça: 02/02/1977 !!

seulement, quand je veux récupérer cette date et la remettre sous la forme initiale (les 3 combos), je ne sais pas comment faire...

Merci de votre aide !!

[Invité]

Bonjour,

Je suppose que c'est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
date_naissance = Worksheets("liste des élèves").Cells(ligne_eleve,3)
CBB_modif_jour.Value  = Left(date_naissance, 2)
CBB_modif_mois.Value = Mid(date_naissance, 4, 2)
CBB_modif_annee.Value = Right(date_naissance, 2)

[perchman]

je pense que tu supposes bien !!

merci