listbox et date

[harley topper]

bonjour le forum,
décidément les dates me posent énormément de problèmes, en effet le dernier en date est le suivant:

je dispose d'une listbox à plusieurs colones, je voudrais rapatrier de cette listbox une date pour la placer dans une textbox. En utilisant la formule suivante :
userform1.textbox1.value = listbox1.list (listbox1.listindex,0)
j'obtient le résultat suivant:
au lieu d'importer la date 03/12/04 j'importe le chiffre 38324.

que dois je faire pour importer cette date et non ce chiffre?????????

Merci d'avance de votre réponse

a+

 

[tatiak]

Bonsoir,
en fait une date est un nombre.
les listbox "lisent" du texte.
il est donc nécessaire de tranformer la date en texte.

 

[IFFIC]

Bonsoir Harley .........Iffic sonne

Je me suis planté comme toi avec ce format date

Voici donc un p'tit bout de ce qui m'a permis de récupérer une date saisie
pour comparaison ou l'inscrire en Item dans une ListBox:

DATE1 = Format(Worksheets("Feuil1").Cells(1, 1), "yyyy")
Dans cette cellule où j'avais écrit "23/08/1950

En fait, c'est une mise en forme pour que "DATE1" reste une date
et non un nombre (Dont je n'ai pas encore pigé le sens, si ce n'est
que le nombre de jours depuis le 01-01-1900. peut être)

Tente le coup, avec éventuellement les jours dd et les mois mm, si besoin.

Je n'ai pas trop de le temps de construire un exemple, mais si tu coinces,
dis le moi.

Bonne soirée.

Iffic

 

[harley topper]

salut le forum,
sauf vous manquer de respect, je plante! et ce malgré vos conseils avisés!
need help, once again!!!!!!!!

 

[tatiak]

Salut
Essaye la formule :
userform1.textbox1.value = format(cdate(listbox1.list (listbox1.listindex,0)),"dd/mm/yy")

 

[harley topper]

salut forum,
pb résolu!!!!
100000merci