Automatic Date in User Form

[Guest]

Trying to have the date displayed as the default value in a userform. When I
enter the Value of =Date+1 that is the text that is displayed rather than
5/3/2005 as I need. Any ideas of how to enter a formula into the Value field
or code that will change the display value on open?

Have also tried the following without success
Private Sub TSGReport_Activate()
Set TxtBxDate.Value = Date+1
End Sub

This second part does set the variable to the correct value however it does
not display it as default.

Thank you
Jason

 

[Michael Bauer]

Hi Jason,

please try this: TxtBxDate.Text = DateAdd("d",1, Date)

 

[Guest]

Hi again Michael,
Unfortunatly the Date field still shows blank when the userform is
loaded.

Jason

 

[Michael Bauer]

Hi Jason,

I´ll wait with any answer till we´ve cleared the other thread.