Convertir diferencia de horas a un numero... Pregunta para experto Luis Mondelo
Amigo Luis como estas, quería hacerte una consulta, hace una semana me apoyaste en el caso de ver la diferencia entre dos horas.
Por ejemplo
18:00:00 (hora definida) - 20:30:00 ( horario de salida se ingresa en formulario), gracias al código que me enviaste muestra la diferencia en la siguiente manera 2.30.00, lo cual me indica que hay 2 horas y 30 minutos de diferencia.
Lo que me gustaría es que agregarle unas lineas al código que cambie el 2.30.00 que muestra en ese caso por 2.5 , ya que ese datos es mas real ya que son 2.5 horas en realidad.
Muchas gracias amigo Luis.
1 Respuesta
En ese caso la macro debe ser así:
(Multiplicamos 24 la resta de las horas para pasarla a porción numerica)
Private Sub CommandButton1_Click()
If CDate(TextBox2.Value) > TimeValue("18:00:00") Then
diferencia = (CDate(TextBox2.Value) - TimeValue("18:00:00")) * 24
MsgBox "Tiempo excedido en-----> "& diferencia
End If
End Sub
