Menu
  1. Accueil
  2. Trucos
  3. Programación
  4. Lenguajes
  5. Visual Basic
Gracias
1
Gracias

Unas palabras de agradecimiento nunca están de más.

VBA: VB - : Convertir hora > decimal y decimal > Hora

Última actualización: por Irene Burn .

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.

Convertir hora en número decimal

Para ello empleamos la siguiente función:

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

Convertir número decimal en hora

Si deseamos realizar la operación inversa empleamos esta otra:

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

Foto: © Unsplash

Gracias
1
Gracias

Unas palabras de agradecimiento nunca están de más.

Haz una pregunta
Nuestros contenidos son redactados en colaboración con expertos del ámbito tecnológico bajo la dirección de Jean-François Pillou, fundador de CCM.net. CCM es un sitio de tecnología líder a nivel internacional y está disponible en 11 idiomas.
El documento « VBA: VB - : Convertir hora > decimal y decimal > Hora » se encuentra disponible bajo una licencia Creative Commons. Puedes copiarlo o modificarlo libremente. No olvides citar a CCM (es.ccm.net) como tu fuente de información.

¡Suscríbete a nuestra Newsletter!

Recibe nuestros mejores artículos

¡Suscríbete a nuestra Newsletter!