format date d'un textbox

ROGER2327

XLDnaute Barbatruc

• 14 Décembre 2010

• #2

Re : format date d'un textbox

Bonjour natorp

Essayez ceci :
Cells(Lign, 1).Value = Format(DateSerial(2010, 9, TextBox1.Value), "dd/mm/yyyy")

ROGER2327
#4740

Samedi 14 Sable 138 (Don Quichotte, champion du monde, SQ)
24 Frimaire An CCXIX
2010-W50-2T14:57:24Z

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 14 Décembre 2010

• #3

Re : format date d'un textbox

Bonjour patron

A tester

Code:

    Lign = Range("F151").End(xlUp).Row + 1
    Cells(Lign, 1).Value =TextBox1.Value  & "/09/2010"

et si tu souhaites une date

Code:

     Lign = Range("F151").End(xlUp).Row + 1
     Cells(Lign, 1).Value =Cdate(TextBox1.Value  & "/09/2010")
     Cells(Lign, 1).numberformat="dd/mm/yyyy"

Edit : Salut ROGER

 

Vote positif 0 Vote négatif

natorp

XLDnaute Barbatruc

• 14 Décembre 2010

• #4

Re : format date d'un textbox

Re Roger
Merci cela solutionne bien le problème de chiffre mais apparemment pas le format date car le texte se trouve tjrs à gauche dans la cellule cible....
sinon merci beaucoup, vous être vraiment impressionnant, je suis admiratif de votre savoir et de votre disponibilité

cordialement; Gérard

 

Vote positif 0 Vote négatif

natorp

XLDnaute Barbatruc

• 14 Décembre 2010

• #5

Re : format date d'un textbox

Ben voilà, merci Pierrejean

ça marche avec la deuxième solution que j'adopte

merci à vous

C'est génial.... vous êtes super sympa....

Gérard

PS : je viens de voir que Pierrejean m'appelle patron, anagramme de natorp, je n'avais pas fait attention à cela, je l'ai choisi car il ne veut rien dire dans ma tête et je ne suis pas patron....et du coup il est libre sur tous les sites où j'ai besoin de m'inscrire.... lol

 

Dernière édition: 14 Décembre 2010

Vote positif 0 Vote négatif