Use the following code in the calling form:
DoCmd.OpenForm "FrmCalendar",, ,,,acDialog
If Forms!FrmCalend ar.IsOpen Then
Me!NameOfDateTe xtbox = Forms!FrmCalend ar!NameOfCalend arControl.Value
DoCmd.Close "FrmCalenda r"
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******@pcdata sheet.com
"Mike Charney" <no*****@everyt hing.net> wrote in message
news:3Z******** *******@newssvr 12.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