requête access 2010

[audreysorelle]

Bonjour, j'entrer cette requête:
Private Sub Modifiable4_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[IdCommande] = " & Str(Nz(Me![Modifiable4], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
mais elle ne marche pas SVP AIdez moi