Conversion de texte en date

Bonjour à tous,

J'ai un petit soucis sous Excel.

A partir d'une application, j'exporte des données sous la forme d'un tableau (fichier joint) qui contient des dates sous la forme de texte.

J'aimerai faire une macro pour convertir les colonnes G à AU du fichier afin de pouvoir exploiter exploiter ces dates pour y mettre des alertes.

J'arrive à le faire, colonne par colonne en utilisant la fonction convertir, mais lorsque j'inclus cette fonction dans une macro cela ne fonctionne pas du tout !

Merci d'avance pour vos réponses

Bonjour

Les dates dans ton fichier ne vont pas de G à AU mais de B à AP et qu'elle est le code que tu utilises ?

A te relire

Bonjour,

les dates du fichier que tu joins sont exploitables, je ne vois le problème.


Re,

Sinon tu inseres le code suivant dans un module et tu l'exécutes.

Sub Conversion()
Set plg = Range("B3:AU2800")
For Each cel In plg
    jj = Mid(cel, 1, 2)
    mm = Mid(cel, 4, 2)
    aa = Mid(cel, 7, 4)
    cel.Value = (jj & "/" & mm & "/" & aa)
Next
End Sub

Bonjour Kingfadhel,

Merci pour ton code.

EN le regardant je me dis que c'est en effet tout simple, mais lorsque je l'applique, il y a des cellules qui ne sont pas converties.

Je n'arrive pas à me l'expliquer !

Re

essaie ceci :

Sub Conversion()
Set plg = Range("B2:AP109")
For Each cel In plg
With cel
If cel > "" Then
   .Value = CDate(.Value)
   .NumberFormat = "dd/mm/yyyy"
End If
End With
Next
End Sub

Si ok, clique sur le V vert à coté du bouton EDITER pour cloturer le fil

Amicalement

Merci !

Macro efficace... c'est parfait !

Rechercher des sujets similaires à "conversion texte date"