VBA(Visual Basic for Applications) es un lenguaje de programación de macros, es decir, un conjunto de instrucciones que sirven para automatizar tareas repetitivas desde Microsoft Office, pudiéndose emplear en cualquiera de sus productos.
Sub ConvertirHoraEnDecimal() Dim D As Date, TB, Resultado As Single 'Para el ejemplo, pero puede ser en string D = "12:15" TB = Split(D, ":") Resultado = TB(0) + ((TB(1) * 100) / 60) / 100 End Sub
Sub ConvertirDecimalEnHora() Dim D As Single, Resultado, e 'Para el ejemplo D = 1.25 e = CStr(Round((D - Int(D)) / 100 * 60, 2)) & "0" Resultado = CStr(Int(D)) & ":" & Mid(e, 3, 2) End Sub