Pb de format de date

Résolu
mstecluque Messages postés 73 Date d'inscription   Statut Membre Dernière intervention   -  
mstecluque Messages postés 73 Date d'inscription   Statut Membre Dernière intervention   -
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)

1 réponse

  1. jordane45 Messages postés 30427 Date d'inscription   Statut Modérateur Dernière intervention   4 832
     
    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
    1. mstecluque Messages postés 73 Date d'inscription   Statut Membre Dernière intervention  
       
      Merci, vraiment.
      Je bataille là dessus depuis vendredi midi.
      Merci!!
      0
    2. mstecluque Messages postés 73 Date d'inscription   Statut Membre Dernière intervention  
       
      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