Private Sub Form_AfterUpdate() CurrentProject.Connection.Execute («INSERT INTO tMainHistory (КодДляТаблицы, Регион) VALUES (‘4’, ‘Саратов’)») [Form_подчиненная форма tMainHistory].Requery End Sub