Probleme sur Simple Macro fonction remplacement

Bonjour a tous,

J'ai passe pas mal de temps a comprendre pourquoi ma macro bug en cours de route mais en vain.
Je souhaite remplacer mes dates en format 04.04.2017 dans le format suivant : 04/04/2017.

Le resultat est positif pour les premieres dates, mais arrive a Mai, il y a un inversement des jours et mois qui s'effectue (pourquoi..je ne sais pas).
J'en appelle donc a votre aide.

Ci-joint le fichier pour que vous puissiez tester.

En vous remerciant par avance de votre aide précieuse.

Pièce jointe 264814

Bonjour

Citation:

---

Ci-joint le fichier pour que vous puissiez tester.

---

Lis donc ma signature.
Si tu souhaites mon aide, montre donc ton code (entre balises code).

Bonjour Unparia,

Merci pour ton retour.

Ci dessous le code :

Code:

---

1 2 3 4 5 6 7 8

Sub Remplacement()   For y = 1 To 140 ThisWorkbook.Sheets("Sheet1").Cells(1, y) = Replace(Cells(1, y), ".", "/")   Next y   End Sub

---

Fichier attache dans mon premier message.

Merci.

regarde ce que fait ceci, par exemple :

Code:

---

Range("A1").Value = CDate(Replace(Range("A1").Value, ".", "/"))

---

et extrapole
N'oublie pas de formater en date la colonne concernée.

C'est parfait, ca fonctionne. :)
Un grand merci pour ton aide si rapide.

Bonne soiree.