Код
Dim rst As Recordset
Set rst = Me.RecordsetClone // тут ошибка type mismatch 13

Нахожу в хелпе Аксесса, а также и в форуме, как с этим бороться:
Dim rst As DAO.Recordset
Set rst = Me.RecordsetClone ..... и получаю compile error 'user-defined type not defined' на DAO.Recordset. В чем дело?

Заранее спасибо

Если не трудно, расшифруйте термин "подключи DAO в референсах"... Какую волшебную строчку следует написать? Я в Access почти полный чайник.

Спасибо. Положительная динамика есть, но до совершенства далеко :-)
Вот полный текст кода (между прочим, из хелпа, с незначительными изменениями)

Private Sub ClientID_AfterUpdate()
Dim rst As DAO.Recordset
Dim strSearchName As String
Set rst = Me.RecordsetClone
strSearchName = Me!ClientID
rst.FindFirst "Client = " & strSearchName // Client - ключевое поле
//если это имеет значение....
If rst.NoMatch Then
MsgBox "Record not found"
Else
Me.Bookmark = rst.Bookmark
End If
rst.Close
Set rst = Nothing
End Sub

Все прекрасно, в переменную strSearchName заносится значение поля со списком, скажем, 'Клиент1', после чего выдается сообщение:
'Run-time error 3070 The Microsoft Jet Database Engine does not recognize 'Клиент1' as valid field or expression".
Специалисты, поглядите, плиз, а то пример целиком из хелпа, и не фурыкает.

Всем спасибо, все работает. Так как этот вопрос (переход на запись с помощью поля со списком) доволно часто мелькает, привожу работающий код, может, кому понадобится:
Private Sub ClientID_AfterUpdate()
Dim rst As DAO.Recordset
Dim strSearchName As String
Set rst = Me.RecordsetClone
strSearchName = Me!ClientID
rst.FindFirst "Client = '" & strSearchName & "'"
If rst.NoMatch Then
MsgBox "Record not found"
Else
Me.Bookmark = rst.Bookmark
End If
rst.Close
Set rst = Nothing
End Sub
и хочу предупредить, на случай, если найдется еще такая бестолочь, как я - элемент 'Поле со списком' должен быть свободным (а у меня там в данных ссылка на ключевое поле стояла, и при выборе значения происходила попытка это поле изменить, хе-хе.....)