Pozicioniranje na izmenjeni slog na continous formi u Access-u

Nakon refresha continous/datasheet forme Access pozicionira pokazivač sloga na prvi slog u tabeli. Rešenje koje možda nije najelegantnije ali provereno radi :


Dim currID As Variant
currID = Me.ID
Dim rsC As Recordset
Set rsC = Me.RecordsetClone
Me.Requery
With rsC
    .Find "ID = '" & currID & "'"
    If .EOF Then
         MsgBox "Ne mogu da pronađem podatak"
     Else
         Me.Bookmark = .Bookmark
    End If
End With