martes, 19 de diciembre de 2023

Yvb

 Sub SumarHoras()

    ' Sumar 1 hora 55 minutos a D5 y colocar el resultado en E5

    Range("E5").Value = Range("D5").Value + TimeValue("01:55:00")

    

    ' Sumar 3 horas 55 minutos a D5 y colocar el resultado en F5

    Range("F5").Value = Range("D5").Value + TimeValue("03:55:00")

    

    ' Sumar 5 horas 55 minutos a D5 y colocar el resultado en G5

    Range("G5").Value = Range("D5").Value + TimeValue("05:55:00")

    

    ' Sumar 7 horas 40 minutos a D5 y colocar el resultado en H5

    Range("H5").Value = Range("D5").Value + TimeValue("07:40:00")

End Sub

No hay comentarios.:

Publicar un comentario