Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Mise en forme date

ivan27

XLDnaute Occasionnel
Bonjour à tous,

Je reçois régulièrement des fichiers qui peuvent contenir des dates formatées avec un "-" comme séparateur. Exemple 02-05-2023. Pour obtenir un format avec "/" j'utilise ceci :

VB:
Sub TransformeDate()
For Each c In Range("A1", "A" & Range("A65000").End(xlUp).Row)
    c.Value = Replace(c.Value, "-", "/")
Next c
End Sub

Le problème c'est que je me retrouve avec des inversions jour / mois et que même les dates qui n'ont pas de tiret sont impactées. 02/05/2023 devient 05/02/2023.

Fichier exemple en pièce jointe.

Merci pour votre aide.

Bien cordialement,

Ivan
 

Pièces jointes

  • DateTexte.xlsm
    14.2 KB · Affichages: 4

Cousinhub

XLDnaute Barbatruc
Bonjour,
Sans formules...
Tu sélectionnes la colonne A, puis ruban "Données", onglet "Outils de données", tu cliques sur "Convertir".
Étapes 1 et 2, tu passes en cliquant sur "Suivant", et à l'étape 3, tu sélectionnes "Date" (en laissant JMA)

Et les dates restent conformes
Bonne journée
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…