Contador de registros conforme vas avanzando por los registros de un formulario
En un formulario tengo un control que me suma el total de registros del formulario =Cuenta([IdCliente]). He querido añadir un control que le llamo "NReg" que me indique el número de registro del total, y en dicho formulario en el evento "Al activar registro" le he añadido lo siguiente:
Private Sub Form_Current()
Me.NReg = CurrentRecord
End Sub
Funciona bien excepto que, cuando avanzo con el botón siguiente me añade un registro en blanco, entonces si tengo 70 clientes el control NReg me marca 71 de 70. En el siguiente registro sí que no me deja y lanzo un MsgBox indicando que se está en el último registro que está en blanco. La cuestión es, que no quiero que con el botón siguiente me añada un registro en blanco para que los contadores se ajusten a los registros que tengo en el formulario, pero también que pueda añadir un nuevo registro cuando lo precise sin desactivar "Modo agregar" del formulario, pues con el "Modo agregar" en No, sí que funciona perfectamente.