Hi there,

Working with dates can often be tricky! The following code (in the VBA code module of the userform) works for me:
Range("A1").Value = DateValue(Me.txtDate.Value)
If this doesn't do the trick, post your workbook (or a section of it) here and I'll take a look at it.

Regards,

Greg M