Userform et dates

ldexplorer

XLDnaute Junior
Bonsoir à vous tous et bon WE ... .. . devant excel !

Je rencontre le problème suivant :

Je rentre des données à partir d'un userform et notamment des dates.

Le problème c'est que la feuille semble considérer ces dates comme étant au format texte d'ou problème de tri, graphique faux.

Il faut à chaque fois que je reprenne les tableaux sur les feuilles pour apporter la correction d'ailleurs indiqué par un petit point exclamation vert.

Pouvez vous m'aider très cher excellien qui excellait avec excel !

Merci
 

Gorfael

XLDnaute Barbatruc
Re : Userform et dates

ldexplorer à dit:
je n'ai pas encore eu le temps de vraiment tester mais je crois qu'il faut utiliser la fonction cdate(expression).value.
Salut
Effectivement, une TextBox contient du texte. Pour l'exporter sur une feuille, il faut donc la convertir en Date Par exemple avec:
Sheets("feuil1").range("A1") = CDate(textBox1)

ou un peu plus élaboré :
if isdate(textBox1) then
Sheets("feuil1").range("A1") = CDate(textBox1)
else
Msgbox(TextBox1.Text & " n'est pas une date valide !")
textBox1.Text=""
TextBox1.setfocus
A+
 
Dernière édition:

Discussions similaires

Réponses
16
Affichages
2 K

Statistiques des forums

Discussions
312 470
Messages
2 088 698
Membres
103 924
dernier inscrit
Patrick c