Error al restar horas
buen dia!
estoy trabajando en el registro de entradas y salidas de trabajadores y tengo un problema, tengo una celda con hora 8:10 que es la hora máxima de entrada, en un formulario agrego los datos entrada y llegada y los guardo en las celdas, le di formato a las celdas de al lado con la siguiente formula =SI($L$2>E8;0;E8-$L$2) l2=entrada e8=hora de llegada, el problema es el siguiente, cuando ingreso una hora después de la hora de entrada me da los minutos de retardo ej: 8:12 --02:00 de retardo pero si ingreso un numero menor a 8:10 me marca ###.
1 respuesta
gracias por responder, si me marca donde tengo la formula yo estoy ingresando los datos desde un formulario creo que es ahi donde esta el problema, solo me valida una condición.
Adapta el siguiente código a tu formulario
h = Hour(TextBox1)
m = Minute(TextBox1)
s = Second(TextBox1)
hora = TimeSerial(h, m, s)
Range("E8") = hora
Cambia Textbox1 por el control que estés utilizando
Cambia Range("E8") por el código que tengas para pasar la hora a la celda
Si necesitas ayuda, pon tú código para revisarlo
Saludos. DAM
Si es lo que necesitas.
Range("a7").Select
If TextBox1 <> "" Then
Set fila = Range("a7:a1000").Find(what:=TextBox1)
If Not fila Is Nothing Then 'siesta
Range(fila.Address).Select
'MsgBox fila.Row
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(0, 2).Select
Loop
ActiveCell = TextBox3
ActiveCell.Offset(0, 1).Select
ActiveCell = TextBox4
ActiveCell.Offset(0, 1).Select
Else 'sinoesta
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell = TextBox1
ActiveCell.Offset(0, 1).Select
ActiveCell = TextBox2
ActiveCell.Offset(0, 1).Select
ActiveCell = TextBox3
ActiveCell.Offset(0, 1).Select
ActiveCell = TextBox4
ActiveCell.Offset(0, 1).Select
End If
End If
Set fila = Nothing
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox4 = Empty
End Subasi quedarían los datos
lunes martes
id nombre entrada salida entrada salida...........retardolunes retardo martes
1 roberto 8:12 17:30 7:58 17:00 00:02 00:00
Así no entiendo, no sé cuál es tu textbox con la hora.
Mejor envíame tu archivo con el formulario, me dices cómo entro al formulario y cuáles son los textbox con la hora.
