Como crear un botón que abra un formulario con el registro seleccionado de un subformulario en modo tabla

Estoy programando un botón el cual me tendría que abrir un formulario con los datos del registro seleccionado en un subformulario modo tabla.

He escrito este código pero me dice que no encuentra el campo 'codi' al que hace referencia la expresión.

El campo codi es autonumerico y se encuentra en un tabla siendo campo clave.

Private Sub Selecionar_factura_Click()
On Error GoTo Err_Selecionar_factura_Click

Dim stDocName As String
Dim stLinkCriteria As String
If Me.[Subformulario qryeditfactura].Form.CurrentRecord <> 0 Then
stDocName = "EDICIO FACTURA GENERICA"
DoCmd.OpenForm stDocName, , , "codi=" & Me.[Subformulario qryeditfactura]!codi & ""
Else
MsgBox "No hi ha cap persona sel·leccionada", vbCritical
End If

Exit_Selecionar_factura_Click:
Exit Sub

Err_Selecionar_factura_Click:
MsgBox Err.Description
Resume Exit_Selecionar_factura_Click
End Sub

Añade tu respuesta

Haz clic para o