Date dans textbox

[kikol]

bonjour,

je souhaiterai que la textbox1 d'une user forme affiche de base la date du jour.

j'ai pondu cela mais rien ne ce passe :

Private Sub TextBox1_Change()
TextBox1.Value = Range("A2").Value
End Sub

A2 = aujourdhui()

Merci de votre aide les amis...

KIKOL

 

[13GIBE59]

Re : Date dans textbox

Bonjour kikol

Essaie :

TextBox1.Value = [B]CDate[/B](Range("A2").Value)

 

[kjin]

Re : Date dans textbox

bonjour,
Tu essaies d'afficher qq chose dans la textbox que tu es en train de modifier !

Private Sub UserForm_Initialize()
TextBox1 = [A2]
'ou plus simplement
'TextBox1 = Date
End Sub

A+
kjin

 

[Francisek]

Re : Date dans textbox

ou alors :

dans les propriétés de ta textbox, tu remplis le champ "control source" avec :

Feuil1!A2