Recorrer los registros de un Formulario continuo para darle un valor a un campo

Tengo un Form continuo en el cual he de variar los valores de un campo en función del tipo de articulo.

Utilizo esta secuencia:

Dim i As Integer

DoCmd.GoToRecord , , acFirst

For i = 1 To Me.Recordset.RecordCount

If Me.TipoImpresion = "GRAN FORMATO" Then
Me.GastosImpresion = Me.GRANFORMATO
Else
End If
DoCmd.GoToRecord , , acNext
Next

Y me esta dando este error:

1 respuesta

Respuesta
2

Primero, si en la condición Else no le vas a decir nada, puedes suprimirla.

Segundo, eso suele pasar cuando el origen de registros del formulario es una consulta con datos agrupados. Prueba a poner

For i......me.recordset.recordcount-1

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas