Nuevo problema con botón en subformulario

Hola de nuevo,
Tengo un nuevo problema con otro botón que me funciona
cuando ejecuto el formulario, pero que no funciona cuando es un subformulario.
El botón se llama incorporar y lo que quiero que haga es
tomar los datos de las casillas Id_pedido, Referencia, Artículo, Envase, Proveedor,
Cantidad, Precio, Total, Id_necesidad de
y las copie en la Tabla Lineapedido. Lo he programado de la siguiente forma:

Private Sub incorporar_Click()
DoCmd.RunSQL "Insert Into Lineapedido
(Id_pedido,Referencia,Artículo,Envase,Proveedor,Cantidad,Precio,Total,
Id_necesidad) values ('" & Me.Id_pedido.Value & "','"
& Me.Referencia.Value & "','" & Me.articulotxt.Value
& "','" & Me.Envase.Value & "','" & Me.Proveedor.Value
& "','" & Me.Cantidad.Value & "','" &
Me.Precio.Value & "','" & Me.Total.Value &
"','" & Me.Id_necesidad.Value & "')"
End Sub

Muchas gracias.