Insertar más de 23:59 horas en un cuadro de texto
Publicado por Akuod (4 intervenciones) el 28/07/2016 18:35:28
Hola, a ver si alguien me puede ayudar.
Tenía un problema con la suma de horas que fueran superiores a 23:59 horas. Lo solucioné de esta forma por si a alguien le interesa, lo vi en google:
Creé una función en el formulario:
Function TiempoTotal(intervalo As Double) As String
TiempoTotal = DateDiff("h", 0, intervalo) & _
Format$(intervalo, ":nn:ss")
End Function
Tengo en Detalle del formulario un cuadro de texto llamado [HORAS] tiene formato hora corta
en el pie del formulario otro cuadro de texto para que me suma las horas que hay en detalle:
en el origen de control de este cuadro de texto escribí esto:
=TiempoTotal(Nz(Suma([HORAS])))
Todo perfecto, me suma el total de horas y si supera las 23:59.
Ejemplo en el primer cuadro de texto hay 23:59 y en el segundo 10:01 y en el cuadro de texto suma me sale:
34:00
-------------------
Mi pregunta. se puede escribir en el cuadro de texto [HORAS] un valor superior a 23:59?
Muchas gracias de antemano.
Tenía un problema con la suma de horas que fueran superiores a 23:59 horas. Lo solucioné de esta forma por si a alguien le interesa, lo vi en google:
Creé una función en el formulario:
Function TiempoTotal(intervalo As Double) As String
TiempoTotal = DateDiff("h", 0, intervalo) & _
Format$(intervalo, ":nn:ss")
End Function
Tengo en Detalle del formulario un cuadro de texto llamado [HORAS] tiene formato hora corta
en el pie del formulario otro cuadro de texto para que me suma las horas que hay en detalle:
en el origen de control de este cuadro de texto escribí esto:
=TiempoTotal(Nz(Suma([HORAS])))
Todo perfecto, me suma el total de horas y si supera las 23:59.
Ejemplo en el primer cuadro de texto hay 23:59 y en el segundo 10:01 y en el cuadro de texto suma me sale:
34:00
-------------------
Mi pregunta. se puede escribir en el cuadro de texto [HORAS] un valor superior a 23:59?
Muchas gracias de antemano.
Valora esta pregunta
0