enregistrer une date de naissance en VBA

Bonjour a tous et toutes,

comment mettre un enregistrement d'une date de naissance dans un tableau du style : jour, mois ,année en VBA

Merci

Salut.

Je ne suis pas certain d'avoir bien compris la question...

Sur base d'un tableau structuré nommé t_dates et structuré comme suit:

Pièce jointe 573470

Tu pourrais utiliser une procédure qui reçoit la date à splitter dans les colonnes

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub AddBirthDate(Contact As String, BirthDate As Date) Dim r As Long r = Range("t_Dates").ListObject.ListRows.Add.Index Range("t_Dates[Contact]")(r).Value = Contact Range("t_Dates[Année]")(r).Value = Year(BirthDate) Range("t_Dates[Mois]")(r).Value = Month(BirthDate) Range("t_Dates[Jour]")(r).Value = Day(BirthDate) End Sub   Sub Test() AddBirthDate "Jules", DateSerial(1985, 12, 14) End Sub

---

Il faudra en dire plus sur la conception de ton classeur et l'ergonomie qui te permet de récupérer les données à placer dans le tableau si tu souhaites une aide plus adaptée.