transfert de données texbox

[inèsanso]

bonsoir,

j'ai un petit probleme lorsque je fait un transfert de données via userform et textbox(celui ci est une date sous forme 01/01/2011) les jours et mois sont inversés seulement sur les dates ambigues exemple 03/01/2011 se transforme en 01/03/2011. dans ma feuille de calcule j'ai bien mis sous forme date courte.

merci de votre aide. bonne soirée.

 

[Pierrot93]

Re : transfert de données texbox

Bonjour,

essaye avec la fonction "cdate" :

Range("A1").Value = CDate(TextBox1)

la valeur contenue dans le textbox doit être reconnu par Excel comme une date, il y a peut être lieu de faire un test préalable, car si ce n'est pas une date, vba renverra une erreur...

If IsDate(TextBox1) Then Range("A1").Value = CDate(TextBox1)

bonne journée
@+

 

[inèsanso]

Re : transfert de données texbox

bonjour pierrot,

je n'arrive pas à mettre le code que tu m'a indiqué, j'ai mis un bout de mon fichier sur le 1er post.
merci pour ton aide.

 

[Pierrot93]

Re : transfert de données texbox

Re,

perso pas 2007, je ne peux ouvrir ton fichier....

@+

 

[stefan373]

Bonsoir inèsanso et le forum.

Voilà ou mettre le CDate que vous suggères Pierrot93.

Résultat.Offset(0, 2).Value = CDate(Application.Proper(Me!datenais))

A +

 

[Pierrot93]

Re : transfert de données texbox

Bonjour,

essaye ainsi :

Résultat.Offset(0, 2).Value = CDate(datenais)

en supposant "datenais", le nom d'un "textbox" et "Résultat" un objet "range"...

bonne journée
@+

 

[inèsanso]

Re : transfert de données texbox

merci pour vos réponses j'ai choisi la solution de stefan373 qui marche très bien encore merci.


Voilà ou mettre le CDate que vous suggères Pierrot93.

Résultat.Offset(0, 2).Value = CDate(Application.Proper(Me!datenais))