ник: k@s
Вот кусок из модуля начала загрузки , как и куда добавит ссылку?
Public Function пуск()
Dim R As Recordset
ОТКРЫТЫ_форма1 = False
' с этой функции всё начинается
Set W_DB = CurrentDb
Set T_L = W_DB.Open_Recordset("форма1")
T_L.Index = "Ключфирма"