Use the following code in the calling form:
DoCmd.OpenForm "FrmCalendar",,,,,acDialog
If Forms!FrmCalendar.IsOpen Then
Me!NameOfDateTextbox = Forms!FrmCalendar!NameOfCalendarControl.Value
DoCmd.Close "FrmCalendar"
End If
Put the following code in the AfterUpdate event of the calendar control:
Me.Visible = False
--
PC Datasheet
Your Resource For Help With Access, Excel And Word Applications
Over 1175 users have come to me from the newsgroups requesting help
re******@pcdatasheet.com
"Mike Charney" <no*****@everything.net> wrote in message
news:3Z***************@newssvr12.news.prodigy.com. ..
I am trying to use the calendar control in Access (Calendar Control 11.0)
I have it working but for only one form. I do not know VB/VBA very well,
but how can I open the calendar control, which is on a form called
frmcalendar, so that all I have to do is click or double click a date and
the date is transferred back to the calling form?
I have looked at several outside calendars but I don't want to use them. I
would rather stick with MS-Access.
Mike