thebeavis45
Technical User
I am attempting to have a calendar control enter a date into a text box. When a date is selected on the calendar I get a "runtime error 2113" The code is:
Private Sub Calendar1_Click()
Me!CalendarDate.Value = Format(Me!Calendar1.Object.Value, "dddddd"
End Sub
Any help please?
Private Sub Calendar1_Click()
Me!CalendarDate.Value = Format(Me!Calendar1.Object.Value, "dddddd"
End Sub
Any help please?