Format de date vba

croco40

XLDnaute Occasionnel
Bonjour à tous et meilleurs voeux de sante bonheur et tout et tout.

J'ai fait pas mal de recherches sur le forum, mais je n'ai pas trouvé la réponse à mon problèem.
Voila.

sous XL2003 :
A partir de trois USF.combobox je recupere respectivement trois valeurs qui sont jour mois annees.
Dans le sub, je compile ces valeurs separées par des "/".

Puis plus loin, je recopie cette donnee dans excell et je me retrouve avec un format "mm/dd/yy" jusqu'a ce que la valeur du jour ou du mois depasse 12.

J'ai deja eu ce probleme par le passe et c'est assez genant d'autant que je fais des stats avec les resultats.
J'ai essaye de forcer le format par

var1 = format(usf1.cb1.value & "/" & usf1.cb2.value & "/" usf1.cb3.value, "dd/mm/yy")

a la place de "dd/mm/yy" j'ai essayé tout ce qui me passe par la tete, mais le resultat est toujours le meme.
Par avance merci
Suerte croco
PS : un salut africain particulier a pierrejean, a phlaurent55 et a pierrot93
 

david84

XLDnaute Barbatruc
Re : Format de date vba

Bonjour,
pas sûr d'avoir compris mais peut-être
var1 = usf1.cb1.value & "/" & usf1.cb2.value & "/" & usf1.cb3.value
ou
var1 = CDate(usf1.cb1.value & "/" & usf1.cb2.value & "/" & usf1.cb3.value)
ou en remplaçant value par text.
Sinon, le plus simple est de placer un exemple dans un fichier en précisant manuellement le résultat attendu.
A+
Edit : sinon je pense qu'il manque un & dans tonn) test :
var1 = format(usf1.cb1.value & "/" & usf1.cb2.value & "/" & usf1.cb3.value, "dd/mm/yy")
 
Dernière édition:

croco40

XLDnaute Occasionnel
Re : Format de date vba

Merci david84 et mj13,
c'etait tout simplement le cdate qu'il fallait utiliser.
Il y a des fois jedevrais faire une pause pour un pastis car je suis vraiment tres fatigue

Bonne et heureuse annee et encore merci pour votre diligence et clarte
Suerte
Croco
 

Discussions similaires

Statistiques des forums

Discussions
314 645
Messages
2 111 536
Membres
111 184
dernier inscrit
amiko