Теперь, кажется, понятно. На форме полей КодКлиента и КодАбонента нет, но в запросе, источнике формы, они есть. Так?
Если так, то есть два варианта:
1. Сделать на форме два скрытых поля КодКлиента и КодАбонента и применить код, который уже показан.
2. Дополнить немного программу
Dim bb
bb = Me.Form.Bookmark
Me.Form.RecordsetClone.Bookmark = bb ' эти строки позволяют синхронизировать рекордсет
' А теперь немного преобразованный прежний код
If Me.Код = Me.Form.RecordsetClone("КодКлиента") Then
Me.ФлажокКлиент=True: Me.ФлажокАбонент=False
ElseIf Me.Код = Me.Form.RecordsetClone("КодАбонента") Then
Me.ФлажокКлиент=False: Me.ФлажокАбонент=True
End If