Autonúmerico con texto
Publicado por Roberto (1 intervención) el 07/02/2013 14:00:54
Hola, estoy diseñando una base de datos y tengo un problema que me ha atascado, a ver si me lo pueden solucionar:
Tengo un formulario con varios campos, CampoA, CampoB, Campo C, Campo D,...,, y un campo Campo N que es autonúmerico. Uno de esos campos es un código de registro que lo saco con los dos primeros digitos del Campo A, el primero del B, los dos primeros del C, los dos primeros del D, los dos últimos del E y el autonúmerico. Este registro lo saco con el siguiente código:
Private Sub CampoE_AfterUpdate()
Me.Nº_registro = Left([CampoA], 2, 2) & Left([CampoB], 1) & Left([CAmpoC], 2) & Left([CampoD], 2) & Right([CampoE], 2) & Format(CampoN, "000")
End Sub
Ahora bien, lo que necesito es que el autonúmerico se reinicie cuando cambie alguno de los campos A, B o C de manera que si estos campos son iguales los registro se numeren 1, 2, 3, pero en cuanto alguno de los mismos varíe la numeración volvería a empezar en 1...
No se si me he explicado bien, he probado todo y no llego a que me funcione.
Muchas gracias de antemano.
Tengo un formulario con varios campos, CampoA, CampoB, Campo C, Campo D,...,, y un campo Campo N que es autonúmerico. Uno de esos campos es un código de registro que lo saco con los dos primeros digitos del Campo A, el primero del B, los dos primeros del C, los dos primeros del D, los dos últimos del E y el autonúmerico. Este registro lo saco con el siguiente código:
Private Sub CampoE_AfterUpdate()
Me.Nº_registro = Left([CampoA], 2, 2) & Left([CampoB], 1) & Left([CAmpoC], 2) & Left([CampoD], 2) & Right([CampoE], 2) & Format(CampoN, "000")
End Sub
Ahora bien, lo que necesito es que el autonúmerico se reinicie cuando cambie alguno de los campos A, B o C de manera que si estos campos son iguales los registro se numeren 1, 2, 3, pero en cuanto alguno de los mismos varíe la numeración volvería a empezar en 1...
No se si me he explicado bien, he probado todo y no llego a que me funcione.
Muchas gracias de antemano.
Valora esta pregunta
0
