Вроде элементарно (прошу не смеяться-наверное сегодня не мой день)
Имеется форма "читатели" с подчиненной "выдано" на главной кнопочка "выбор" при нажатии которой открывается форма "выбор"(модальная) с кнопкой "добавить".Что и где надо написать чтоб вновь добавленная запись оказалась текущей (в окне, а не за его пределами)

Private Sub добавить_Click()
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("выдано")
With rs
.AddNew
!читатель = Me.читатель 
!автор = Me.автор
!наименование = Me.наименование 
!количество = Me.количество 
!выдано= Me.выдано
!возвратП= Me.возвратП
.Update
End With
DoCmd.Close
Forms!читатели!выдано.Form.Requery
Set rs = Nothing
End Sub

http://www.sql.ru/forum/1153998/ustanovit-fokus