Comment separer les jours, mois et annees d'une date

Bonjour,

Je me retrouve avec un petit souci..... un collègue m'a envoyé un fichier où apparait les dates de naissance de la manière suivante: "10051977". Comment peut on séparer les jours, mois et année conne suit: "10/05/1977".

Ci-joint, un exemple.

Merci par avance.

Bonjour,

Voilà un exemple de formule possible en cellule B2 :

=DATE(CNUM(DROITE(A2;4));CNUM(GAUCHE(DROITE(A2;6);2));CNUM(GAUCHE(A2;NBCAR(A2)-6)))

Bonjour,

Voici une solution possible :

Me dire si besoin d'explications.

Bonjour,

Pour convertir en dates :

Sub ConvertirDates()
    Dim c As Range, n%
    With ActiveSheet
        n = .Range("A" & .Rows.Count).End(xlUp).Row
        For Each c In .Range("A2:A" & n)
            c = DateSerial(c Mod 10000, (c \ 10000) Mod 100, c \ 1000000)
        Next c
    End With
End Sub

Cordialement.

Nikel,......

Merci beaucoup.