XL 2019 Vba excel Date Inverser

G

gbinforme

XLDnaute Impliqué

• 25 Janvier 2021

• #2

Bonjour,

Pour éviter l'utilisation de date américaine, il est souhaitable d'utiliser la fonction Cdate qui tiens compte des paramètres régionaux.

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 25 Janvier 2021

• #3

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).

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 25 Janvier 2021

• #4

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)

 

Vote positif 0 Vote négatif

Solution

I

iliess

XLDnaute Occasionnel

• 26 Janvier 2021

• #5

Merci beaucoup les amis

 

Vote positif 0 Vote négatif