XL 2019 Vba excel Date Inverser

  • Initiateur de la discussion Initiateur de la discussion iliess
  • 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 !

iliess

XLDnaute Occasionnel
bonjour
svp pourquoi mon code prend la date 02/03/2020 au lieu de 03/02/2020 et comment résoudre ce problème.
Merci
inver date.png
 
Solution
Bonsoir

Je te laisse étudier ce petit exemple 😉
VB:
Sub PetitExemple()
Const Le_Deux_Mars = #2/3/2020#
MsgBox Format(Le_Deux_Mars, "dd/mm/yyyy")
MsgBox CDate(Le_Deux_Mars)
MsgBox Format(Le_Deux_Mars, "mm/dd/yyyy")
End Sub
EDITION 2: Bonsoir Dranreb, je n'avais pas vu ton message.
EDITION 1: je n'avais pas vu non plus gbinforme (bonsoir)
Bonsoir.
Un cas connu c'est quand on affecte à la valeur d'une cellule une valeur String interprétable comme une date par conversion standard internationale. La fonction CDate interprète le texte différemment. C'est ça qu'il faut affecter: = CDate(TextBox1.Text).
 
Bonsoir

Je te laisse étudier ce petit exemple 😉
VB:
Sub PetitExemple()
Const Le_Deux_Mars = #2/3/2020#
MsgBox Format(Le_Deux_Mars, "dd/mm/yyyy")
MsgBox CDate(Le_Deux_Mars)
MsgBox Format(Le_Deux_Mars, "mm/dd/yyyy")
End Sub
EDITION 2: Bonsoir Dranreb, je n'avais pas vu ton message.
EDITION 1: je n'avais pas vu non plus gbinforme (bonsoir)
 
- 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

Discussions similaires

Réponses
4
Affichages
211
Réponses
6
Affichages
330
  • Question Question
Microsoft 365 format date
Réponses
3
Affichages
139
Réponses
6
Affichages
432
Retour