goto record

hej !
jeg vil gerne have access til at opdater en forespørgsel og så gå tilbage til sammen record men hvor dan gør jeg ´det.

Private Sub Opdater_Click()
Dim sss As String
sss = Me.CurrentRecord
DoCmd.Requery
DoCmd.GoToRecord acDataForm, \"Vurdering\"

End Sub

mvh
jonas