ник: Борис_Пермь
Спасибо за настойчивость!
но... 97 действительно отличается 
Дорабатывая свою идею получилось все что хотел, а именно:
Private Sub ЭлементActiveX1_Click() 'обявляем название события для календаря "клик мышкой"
formdata.SetFocus ' переводим фокус с календаря в нужное поле формы
DoCmd.FindRecord [ЭлементActiveX1], , True, , True ' ищем в поле значение, равное значению календаря, соотвественно "перелистывая" форму на нужное значение
End Sub
' как это работает, я так и непонял, т.к. не программист, но работает правильно!
Всем спасибо! надеюсь и сам кому нибудь помог! 