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

conversion date en VBA

  • Initiateur de la discussion Initiateur de la discussion Sebwan
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

Sebwan

Guest
Bonjour à tous,

J'aimerais convertir, à l'aide d'une macro, une date en format yyyymmdd en une date dd/mm/yyyy.

Mon idée de base était de faire un stxt(A1,7,2) & "/" & stxt(A1,5,2) & "/" stxt(A1,1,4) mais j'ai un problème avec le format car j'obtiens alors mm/dd/yyyy....

Quelqu'un a-t-il la solution pour ce problème?

Merci d'avance!
 
Re : conversion date en VBA

Bonjour,

en supposant tes dates de A2 à Axxx, essaie avec ce code :

Code:
    Range("A2:A" & [A65000].End(xlUp).Row).TextToColumns Destination:=Range("A2"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, FieldInfo:=Array(1, 5), TrailingMinusNumbers:=True

Bonne semaine
 
Re : conversion date en VBA

bonjpour Sebwan
à essayer
madatetoconvert = "2008/10/05"
msgbox DateSerial(Left(madatetoconvert, 4), Mid(madatetoconvert, 6, 2), Right(madatetoconvert, 2))

à bientôt
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 format date
Réponses
3
Affichages
238
Réponses
5
Affichages
220
Réponses
6
Affichages
654
Réponses
5
Affichages
925
Réponses
8
Affichages
653
Réponses
3
Affichages
283
Réponses
2
Affichages
774
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…