Filtrado de datos de una tabla
Supongamos que tu tabla se llama tblTabla, el campo/columna se llama CodigoRegistro y el campo donde mostrar el valor txtMaximo
En el evento Al Activar Registro (Current) del formulario indica el siguiente código:
Me.txtMaximo = DMax("Val(Right(CodigoRegistro, 4))", "tblTabla", "left(CodigoRegistro, 2)= '" & Left(CodigoRegistro, 2) & "'")
Con la función Dmax buscamos el valor máximo de los cuatro dígitos de la derecha (función Right) que pasamos a número con la función Val en la tabla tblTabla siempre que los 2 dígitos de la izquierda coincidan con los 2 dígitos de la izquierda del registro en el que nos encontramos.