ник: СкН
Ошибки больше нет. Но на заданную запись не переходит. rs.AbsolutePosition определяется правильно и имеет конкретное значение, а Me.Список0.Selected(rs.AbsolutePosition) имеет значение = 0
После того как отправил это сообщение испралил строку Me.Список0.Selected(rs.AbsolutePosition ) = True на
Me.Список0.Selected(rs.AbsolutePosition - 1 + IIf(Me.Список0.ColumnHeads = True, 1, 0)) = True (нашел в Вашем примере "Универсальный поиск" от 2001 года)
и все заработало!!! Но почему то выделяется следующая запись за заданной, поэтому добавил ( -1 ). Олег! Большое Вам спасибо! Надеюсь что проблема решена. Остальное дело техники... 