| Respuesta: Listado
Te faltan dos comillas simples, mira como te lo puse antes:
Me.TxtHorasTotales2 = DSum("Horas", "PartesDeTrabajo", "actividad='Descansos' AND CodigoOperario=" & Me.CodigoOperario & "AND fecha=#" & Format(Date, "mm/dd/yyyy") & "#")
Un saludo |