Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Changement de Format de date

1 réponse
Avatar
Polus
Bonjour cher(es) ami(e)s

Je ne comprends pas pourquoi je n’ arrive pas à changer le format d’ une date.

Ce qui suit fonctionne très bien :
CommandButton1.Caption = Format(DateClicked, "dddd d mmm yyyy")
Textbox1.text= CommmandButton1.caption
J’ obtiens donc « Lundi 12 mars 2007 » dans le Textbox1

Pourquoi en faisant
Date_3 = Format(TextBox1.Value, "yyyy mm dd")
Msgbox Date_3
J’ obtiens encore « Lundi 12 mars 2007 » et non 2007-03-12
Date_3 a été déclaré "as Date"

Merci à l’ avance

1 réponse

Avatar
cousinhub
Bonsoir,
je ne pourrais que te conseiller d'utiliser ton "DateClicked" dans la
suite de ta procédure
Par ex :
Date_3 = Format(DateClicked, "yyyy mm dd")
Msgbox Date_3

ou encore, formater ta cellule de destination avant d'insérer la valeur
de ton textbox
Par ex :
Range("A1").NumberFormat = "yyyy mm dd"
Range("A1").Value = cdate(textbox1)

bon courage

Bonjour cher(es) ami(e)s

Je ne comprends pas pourquoi je n’ arrive pas à changer le format d’ une date.

Ce qui suit fonctionne très bien :
CommandButton1.Caption = Format(DateClicked, "dddd d mmm yyyy")
Textbox1.text= CommmandButton1.caption
J’ obtiens donc « Lundi 12 mars 2007 » dans le Textbox1

Pourquoi en faisant
Date_3 = Format(TextBox1.Value, "yyyy mm dd")
Msgbox Date_3
J’ obtiens encore « Lundi 12 mars 2007 » et non 2007-03-12
Date_3 a été déclaré "as Date"

Merci à l’ avance