Cerrar formulario y error 2585

Hola de nuevo,

cada vez que intento cerrar el formulario me da ese error y no me deja hacerlo. El tema es que quiero que al perder el foco un campo de texto cierre el formulario activo. Copio parte del código:

Private Sub form_dni_LostFocus()
If IsNull(DLookup("[documento_id]", "[participants]", "documento_id= form_dni.value")) Then
        caja = MsgBox("L'usuri no existeix, vols anar a la creació de fitxa?", vbYesNo, "No existeix")
        If caja = 6 Then
             DoCmd.Close acForm, "alumno_curso"
             DoCmd.OpenForm "alta", acNormal
        End If
    Else
        label_nom.Caption = DLookup("[nombre]", "[participants]", "documento_id = form_dni") & " " & DLookup("[Apellido1]", "[participants]", "documento_id= form_dni")
End If

 El formulario que quiero cerrar se llama "alumno_curso" y es el mismo donde esta el campo form_dni.