Sumar campos
Saludos asturcon,
Tengo un problema con una base de datos de ACCESS. Las columnas son los días del año y las filas los trabajadores. Así cada persona es un registro, que tiene 365 campos, uno por cada día de la semana. Los campos contienen números que representan los días menos algunos que tienen la letra "V" que representan las vacaciones.
¿Cómo podría crear una consulta o un formulario que me dijera el número de "v" que tiene un trabajador?
Muchas gracias por tu atención.
Miquel.
Tengo un problema con una base de datos de ACCESS. Las columnas son los días del año y las filas los trabajadores. Así cada persona es un registro, que tiene 365 campos, uno por cada día de la semana. Los campos contienen números que representan los días menos algunos que tienen la letra "V" que representan las vacaciones.
¿Cómo podría crear una consulta o un formulario que me dijera el número de "v" que tiene un trabajador?
Muchas gracias por tu atención.
Miquel.
1 respuesta
Respuesta de asturcon3
1
¿Y por qué no has creado dos tablas, una para trabajadores y otra para fechas con (idtrabaj, fecha, tipo) que te permitiría hacerlo sin más que sumar los registros del trabajador de tipo 'V'?
En fin, dado que lo has hecho así, sólo te quedan dos opciones.
Una es poner en el campo de una consulta
=iif(campo1='V';1;0)+iif(campo2='V';1;0)+... y así hasta el 365.
O bien crear un nuevo módulo y dentro poner
function numV(trabajador)
dim r as recordset,fld as field, nv%
set r=currentdb.openrecordset("select * From tabla where trabajador=" & trabajador)
if not r.eof then
for each fld in r.fields
if left(fld.name,3)="dia" then
if fld.value='V' then nv=nv+1
endif
next
endif
numv=nv
end function
Y en un campo de una consulta pones x: numv([trabajador])
Todo esto suponiendo que el campo clave de tu tabla se llama 'trabajador' y los campos por días se llaman ´dia1','dia2',...
En fin...
En fin, dado que lo has hecho así, sólo te quedan dos opciones.
Una es poner en el campo de una consulta
=iif(campo1='V';1;0)+iif(campo2='V';1;0)+... y así hasta el 365.
O bien crear un nuevo módulo y dentro poner
function numV(trabajador)
dim r as recordset,fld as field, nv%
set r=currentdb.openrecordset("select * From tabla where trabajador=" & trabajador)
if not r.eof then
for each fld in r.fields
if left(fld.name,3)="dia" then
if fld.value='V' then nv=nv+1
endif
next
endif
numv=nv
end function
Y en un campo de una consulta pones x: numv([trabajador])
Todo esto suponiendo que el campo clave de tu tabla se llama 'trabajador' y los campos por días se llaman ´dia1','dia2',...
En fin...
