Pb de format de date

Résolu/Fermé
mstecluque Messages postés 73 Date d'inscription mardi 9 juin 2015 Statut Membre Dernière intervention 28 juillet 2015 - 20 juil. 2015 à 09:40
mstecluque Messages postés 73 Date d'inscription mardi 9 juin 2015 Statut Membre Dernière intervention 28 juillet 2015 - 20 juil. 2015 à 10:53
Bonjour à tous,

J'ai un problème de format de date.
Je voudrais afficher le dernier jour du mois en cours, avec le format mm/dd/yyyy.

J'ai tenté plusieurs choses, mais ma msg box me retourne toujours la date avec le format dd/mm/yyyy.
Si quelqu'un a une idée, merci d'avance.


Dim Mois1 As Date
Mois1 = DateAdd("d", -1, CDate("1/" & Format(DateAdd("m", 1, Date), "mm/yyyy")))
Mois1 = Format(Mois1, "mm/d/yyyy")
MsgBox (Mois1)

A voir également:

1 réponse

jordane45 Messages postés 38138 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 17 avril 2024 4 649
20 juil. 2015 à 10:38
Bonjour,

Dim Mois1 As Date
Mois1 = DateAdd("d", -1, CDate("1/" & Format(DateAdd("m", 1, Date), "mm/yyyy")))
Mois1_formate = Format(CDate(Mois1), "mm/d/yyyy")
MsgBox (Mois1_formate)

0
mstecluque Messages postés 73 Date d'inscription mardi 9 juin 2015 Statut Membre Dernière intervention 28 juillet 2015
20 juil. 2015 à 10:41
Merci, vraiment.
Je bataille là dessus depuis vendredi midi.
Merci!!
0
mstecluque Messages postés 73 Date d'inscription mardi 9 juin 2015 Statut Membre Dernière intervention 28 juillet 2015
20 juil. 2015 à 10:53
Au final c'était un pb de déclaration de données... je suis dégoûtée d'avoir perdu autant de temps sur ça!
0