Dates in Userforms

[Kris75]

Hi Guys

I have a text box that when initalized sets the date as dd/mm/yy (01/05/10)

this is good, but when i have clicked on my command button to submit the date it converts the date as 05/jan/10

what am i doing wrong?

ActiveCell.Value = txtdate.Value
ActiveCell.NumberFormat = "dd/mm/yy"

 

[*shudder*]

Try this:

ActiveCell.Value = Cdate(txtdate.Value)

This should set it to the system date format of Excel

or

ActiveCell.Value = Format(txtdate.Value, "dd/mm/yyyy")

HTH

 

[Kris75]

Try this:

ActiveCell.Value = Cdate(txtdate.Value)

This should set it to the system date format of Excel

or

ActiveCell.Value = Format(txtdate.Value, "dd/mm/yyyy")

HTH

Thank you, the top one did it!