SoloCodigo

Tengo un programa en mi empresa en el que tengo un error desde hace tiempo y me he puesto a investigar.

El error es el siguiente: Se ha producido el error '13' en tiempo de ejecución. no coinciden los tipos.

Al dar a depurarlo aparece lo siguiente:

Option Compare Database

Private Sub Comando0_Click()
DoCmd.OpenReport "I_Envios_Recibidos", "acViewPreview"
DoCmd.Close acForm, "f_PETICION_PROVEEDOR_Y_FECHAS_ENTRADAS"
End Sub

Private Sub Comando1_Click()
DoCmd.Close
End Sub


Private Sub ID_Proveedor_AfterUpdate()
Me.ID_ARTICULO.Requery
End Sub

aparece en amarillo marcado DoCmd.OpenReport "I_Envios_Recibidos", "acViewPreview"
con lo cual deduzco que este es el error. Porfavor, echazme una mano

Gracias

Al hacer esto me ha salido el siguiente error

Se ha producido el error '3001' en tiempo de ejecución:
Argumento no válido

Doy a depurar y me vuelve a indicar

Option Compare Database

Private Sub Comando0_Click()
DoCmd.OpenReport "I_Envios_Recibidos", acViewPreview
DoCmd.Close acForm, "f_PETICION_PROVEEDOR_Y_FECHAS_ENTRADAS"
End Sub

Private Sub Comando1_Click()
DoCmd.Close
End Sub


Private Sub ID_Proveedor_AfterUpdate()
Me.ID_ARTICULO.Requery
End Sub