Estas en:
gratiszona
>>
trucos
>>
trucos access
trucos access: Numeracion automatica dependiente de un cambio de año
En muchos libros de registro de entrada de empresas, departamentos y organismos publicos se lleva una numeracion consecutiva que comienza con el nº 1 cada año. Si en Access se crea un campo autonumerico para este cometido, al pasar a un nuevo año, el contador del autonumerico seguira adelante indefinidamente. Si lo que se desea conseguir es que el contador vuelva al valor 1 de modo automatico, hay que seguir el procedimiento que aqui se explica.
Supongamos una tabla llamada Expedientes en la que, entre otros, existen los campos Añoactual, que controla el año en que estamos, y Numexp, que controla el campo contador del que hablamos. Como estos campos se van a calcular automaticamente, en el formulario de entrada de datos no seran punto de tabulacion. Por esta razon vamos a tener en cuenta el primer campo que reciba el enfoque del cursor para introducir un dato. En las propiedades de este campo, ir al evento Al recibir el enfoque para incluir unas lineas de codigo como las siguientes:
[Añoactual] = Year(Date)
If [Numexp] = Null OR [Numexp] = 0 Then
[Numexp] = DCount(\"[Numexp]\", \"Expedientes\", \"[Añoactual]
=\" & [Añoactual]) + 1
End If
If [Numexp] = 0 Then
[Numexp] = DCount("[Numexp]", "Expedientes") + 1
End If
Lo unico que hay que hacer es reemplazar los nombres de los campos (que figuran entre corchetes) y el nombre de la tabla por los que correspondan.
Actualizado: 18/09/2008
Mejor Internet Explorer o
Si has encontrado esta web de tu agrado, ¡ diselo a tus amigos ! Nos ayudas a cubrir gastos si con un simple SMS te bajas a tu movil un logo, un tono o una melodia polifonica desde:
www.gratiszona.com/moviles
www.conmovil.com
·
·
apuntes
trucos