я обычно открываю справочник,
чтобы не только посмотреть расширенные свойства выбора
но и с комфортом (а не просто из списка) выбрать значение для поля
для этого в форме справочника я делаю Public свойство
куда загоняю ссылку на контрол который вызвал справочник
В модуле формы справочника
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Private ctControl As Control
Public Property Set ExternalControl(ct As Control)
Set ctControl = ct
'--Тута любые черные дела
'--бла бла бла
DoCmd.FindRecord ctControl.Value
End Property
Private Sub Form_Close()
'--При закрытии (или когда это потребуется)можно вернуть выбранное значение в контрол
ctControl.Value ="МоеЗначение"
End Sub
В модуле формы вызывающей справочник
1.
2.
3.
DoCmd.OpenForm "frmСпрДохода", acFormDS
SET Forms("frmСпрДохода").ExternalControl=МойКонтрол
