ник: osmor
1.
Dim ref As Reference
Set ref = References.AddFromFile("C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL")
|
2. налицо не верная структура данных
по идее в главную таблицу должно быть вставлено ТОЛЬКО значение ключевого поля справочника
а так придется открывать еще один рекордсет с условием (ключевое поле = занчению) по второй таблице и получать поля оттуда.