Format date userform

Résolu/Fermé
julia Namor Messages postés 524 Date d'inscription jeudi 27 mars 2014 Statut Membre Dernière intervention 13 janvier 2024 - 12 juil. 2016 à 16:30
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 12 juil. 2016 à 22:13
Bonjour,
Je m'arrache les cheveux.
J’ai un userform formulaire dans le lequel je rentre une date de début et une date de fin et les noms et prénoms.
Seulement les jours et les mois s’inversent dans la base de données.
Je vous joins un fichier test pour le coup de pouce.
Merci par avance.



http://www.cjoint.com/c/FGmoxPSFZey

2 réponses

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
12 juil. 2016 à 17:18
Bonjour Julia, bonjour le forum,

Pour éviter cela il faut toujours :
- Renvoyer la date de l'UserForm vers le tableau avec le format américain "yyyy/mm/dd". Par exemple (je n'ai pas ouvert ton fichier) :

Range("A1").Value = Format(Me.TextBox1.Value,"yyyy/mm/dd")

- Formater, avec le format date que tu désires obtenir, les cellules recevant ces données...

Te verras que ton problème sera résolu.
0
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
12 juil. 2016 à 22:13
Bonjour,

Tout d'abord, remplace
.Range("F" & DL + 1).Value = UCase(CDate(Me.Début.Value))

par
.Range("F" & DL + 1).Value = CDate(Me.Début.Value)
car c'est plus adapté
et ensuite rajoutes cette ligne
.Range("F" & DL + 1).NumberFormat = "dd/mm/yyyy"
cela devrait mieux aller.
0