Eduardo Pérez Fernández

¿Igualmente, no lo encuentro claro si la condición es que el valor del campo sea 0 o que el número no contenga un cero en cualquier posición?

No veo la línea pero puede anteponer DoCmd. SetWarning(False)

Si quiere envíeme la base de datos a [email protected] y trato de colaborarle. Favor en el asunto anotar su consulta

Utilice formato condicional "el campo tiene el foco" y elija el fondo y color, haga esto para cada campo, haga esto para cada campo

Puede utiliza este código Private Sub recicladopor_DblClick(Cancel As Integer) Dim codigo As String ' Obtener el código del campo recicladopor codigo = Me.recicladopor ' Buscar el registro que coincide con el código en la columna "id"...

Como le responden es lo correcto algo como Private Sub Subformulario_AfterUpdate() ' Realizar acciones necesarias en el subformulario ' Recalcular campos en el formulario principal Me.Parent.Requery ' O Me.Parent.Refresh End Sub

Aquí hay algunas sugerencias y cosas que puedes verificar: Campos y tipos de datos: Asegúrese de que los campos en la tabla de destino (Ldetalles1) sean del mismo tipo de datos y estén en el mismo orden que los campos de la consulta de origen...

Está indicando mal los parámetros de la función, debe ser algo como Private Sub Cuadro_combinado52_AfterUpdate() Me.stock_articulo = DLookup("Stock_real", "Inventario", " lote_articulo=" & Cuadro_combinado52) End Sub Si lote_articulo es texto cambia...

Está incluyendo el campo fecha como agrupado y este debe ser "Dónde" algo como Fecha BETWEEN FechaInicio AND FechaFin, posteriormente agrupe y sume.

Se puede hacer mediante SQL si quiere envíeme su base de datos a [email protected] y trato de colaborarle.