Добрый день!

Собственно вопрос: как в коде при нажатии на кнопку ленточной формы сделать запись активной?

Описание проблемы:
Задача состоит в том, чтобы при нажатии на кнопку "Удалить" на записи в ленточной форме удалялась именно ЭТА запись и все вроде бы просто, но на Win7 все отрабатывает отлично, а на Win8.1 почему-то удаляется только ПЕРВАЯ запись. Причем не важно пиратский ли это Office 2007 или лицензионный Office 365 с последними обновлениями, результат один...

Вот код кнопки:

Private Sub btn_Delete_Click()
If MsgBox("Вы действительно хотите удалить запись на " & Me!Наименование_Операции & " средств за " & Me!Наименование & "?", vbYesNo, "Удаление") = vbYes Then
Me.Recordset.FindFirst "КодЗаписи = " & Me.КодЗаписи
Me.Recordset.Delete
Me.Requery
End If
End Sub

Но! если сделать любое поле доступным для редактирования и тыкать в него перед нажатием на кнопку, то удаляется нужная запись, я думаю дело в том, что запись после нажатия на кнопку не становится активной по каким-то причинам и это необходимо сделать явно!

http://www.sql.ru/forum/1140970/lentochnaya-forma-vs-windows-8