frmCalendar ms access 2010

[mr moe]

Hi,
Once I upgraded access to 2010 my frmcalendar doesn't work anymore, anybody has experienced this issue. It's still working fine for ms access 2007. Here is the function i'm using.

Public gtxtCalTarget As TextBox 'Text box to return the date from the calendar to.

Public Function CalendarFor(txt As TextBox, Optional strTitle As String)
On Error GoTo Err_Handler
'Purpose: Open the calendar form, identifying the text box to return the date to.
'Arguments: txt = the text box to return the date to.
' strTitle = the caption for the calendar form (passed in OpenArgs).

Set gtxtCalTarget = txt
DoCmd.OpenForm "frmCalendar", windowmode:=acDialog, OpenArgs:=strTitle

Exit_Handler:
Exit Function

Err_Handler:
MsgBox "Error " & Err.Number & " - " & Err.Description, vbExclamation, "CalendarFor()"
Resume Exit_Handler
End Function

 

[Trevor G]

This may be the reason, Calendar controls where removed in Office 2010 for some reason so you have to either use data pickers or a third party. Have you looked at the references in the VBA screen to see if anything is missing.

Take a look at this link it might help you

http://social.technet.microsoft.com...o/thread/29a50b8f-70f4-4b1d-a29b-4bad20de42a2