Excel : Conversion texte / date

Question

Bonjour j'ai une colonne dont les données sont de type texte à savoir 20120216 que je voudrais convertir en type date au format jj/mm/aaaa.

Merci de votre aide

Habiler

Renfield · Answer

Si c'est a faire une seule fois,

place ton curseur dans une cellule de cette colonne
presse Alt+F11
Ctrl+R
Double clique sur ta feuille

Copie/Colles ce code :
Sub t()
Dim a As Range
Dim b As String
    For Each a In Range(Selection.End(xlUp), Selection.End(xlDown))
        If Len(a) = 8 Then
            b = Format(a, "####-##-##")
            If IsDate(b) Then
                a = FormatDateTime(b, vbShortDate)
            End If
        End If
    Next a
End Sub


et presse F5
et enjoy ^^

Renfield - Admin CodeS-SourceS - MVP Visual Basic	& Spécialiste des RegExp

ucfoutu · Answer

Bonjour,
par exemple et entre autres :
  toto = "20120216"
  MsgBox DateSerial(Left(toto, 4), Mid(toto, 5, 2), Mid(toto, 7))
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

Excel : Conversion texte / date

2 réponses

Votre réponse

Discussions similaires