Contadores en access

Buenas gente los molesto por lo siguiente dado que me doy la cabeza contra el teclado y nada. La solución no viene.

La consulta es esta: Tengo una tabla llamada "Entradas" con los siguientes datos.

Fecha, hora, turno, nro de serie, lote y contador.

el tema es que quiero que en el formulario me lleve el conteo de nros de serie, ingresados, hasta cierto numero en este caso 34.

De ahí que me incremente en 1 el registro Lote es decir +1.

Y vuelva a contar de 0 al 34 para ir cerrando los lotes a esa cantidad.

Luego imprimir los informes (que esto ya lo tengo resuelto).

Ya trate con contadores, este me incrementa el campo registro !pero se clava en 10.

Este código esta en el formulario, en la propiedad del campo de texto "Contador"

Private Sub Form_BeforeInsert(Cancel As Integer)

If Me.NewRecord

Then Me.Contador = Nz(DMax("Contador", "Entradas")) + 1

End If

End Sub

Así que no se como mas puedo solucionarlo.

Alguna mano.Gracias.