Format date userform [Résolu/Fermé]

Signaler
Messages postés
493
Date d'inscription
jeudi 27 mars 2014
Statut
Membre
Dernière intervention
26 décembre 2020
-
Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
-
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

Messages postés
1412
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
9 mars 2021
152
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.
Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 406
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.