DateSeriial in Sub Routines

[GogsJames]

I have a UserForm that uses 3 textboxes for Day,Month and Year. I can't find any way to use the inputs from these boxes to format the input date as DateSerial, only accepts numbers and not text. I,ve tried txtDay.Text = txtDay.Value etc but it is invalid. Can't find a way to convert from text to numeric. Can anybody help please?

[Carim]

Hi,

You can adjust following instruction to your needs ...

txtFrom.Value = Format(DateSerial(Year(Calendar1.Value), Month(Calendar1.Value), Day(Calendar1.Value)), "Short Date")

HTH
Carim