ник: Alex
"... Forms("frmCalendar")![имя контрола календарь].Value = Me!ДатаДок ..."
Имя контрола вроде как ocxCalendar
Пишу соответственно так:
Private Sub ДатаДок_Кнопка_Click()
DoCmd.OpenForm "frmCalendar", , , , , acHidden
Forms("frmCalendar")![ocxCalendar].Value = Me.ДатаДок
или
Forms("frmCalendar")![ocxCalendar].Value = Me!ДатаДок
Forms("frmCalendar").Visible = True
End Sub
|
Календарь по нажатию кнопки открывается, не ругается, но на нажатие кнопок (в календаре) не реагирует, дата в поле не вставляется
