Hi
I'm unable to transfer the date (on clicking the calendar) to a text box on
my userform. For some reason the date gets recorded on one of my sheet tab's
where the cursor was last placed.
(Both the Calendar from & Module were imported from another Project, not
sure what I'm missing )

This is the code I've written. What amendments do i need to make ? Will
apreciate any help.
-------------
Private Sub TxtContactDate1_DblClick(ByVal cancel As MSForms.ReturnBoolean)
CalendarFrm.Show
End Sub

Private Sub CalendarFrm_Click()
Me.viewrecord.TxtContactDate1.Value = Me.CalendarFrm.Value
'ActiveCell.Value.NumberFormat = "mm/dd/yyyy"
End Sub
--------
TxtContactDate1 (is the text box on my userform)
CalendarFrm (is the form I invoke when I double click on "TxtContactDate1"