การเขียน vba ใน access 2007

สอบถามหน่อยครับ code นี้ รันใน access 2000 - 2002 ได้ แต่ทำไม ใช้กับ access 2007 ไม่ได้ครับ

Private Sub Combo83_AfterUpdate()
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[CODE] = " & Str(Nz(Me![Combo83], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub