Sumar horas utilizando un formulario

[DanielB]

Hola a todos:

Por favor si me pueden ayudar a operar con horas. Utilicé el CDate y no me funcionó, utilicé el DATEADD y tampoco. Obvio que hago algo mal.

Les envío un xls para ver cómo se hace para sumar horas.

La planila que envío es simple,  consta de la hoja de excel con un botón que llama a un formulario.

En el formulario hay cuatro textboxs que se deben llenar con horas, otro textbox (enable=false) donde va a estar el resultado. Todos los textboxs deben estar en el formato hh:mm, por ejemplo:

a) 18:30
  5:35
c) 11:42
d)   9:37

El resultado me lo debería dar en el textbox "TOTAL HORAS". Les doy el resultado: 45:24

Consta de dos botones uno "CALCULAR" para poner el resultado en el textbox "TOTAL HORAS" y el otro botón para enviar el resultado a la celda A1.

Como siempre gracias por vuestra ayuda.

Horas.zip

[Haplox]

Mira el código del fichero que te dejo

Horas.xlsm

[Antoni]

Hace 1 hora, Haplox dijo:

Mira el código del fichero que te dejo

Horas.xlsm

Solo una puntualización:

Dim h1, h2, h3, h4 As Date no equivale a esto Dim h1 As Date, h2 As Date, h3 As Date, h4 As Date 

[Haplox]

¿No? ... Gracias Antoni. @DanielB, aunque el código funciona, haz las modificaciones que dice @Antoni

[Antoni]

Aquí os dejo una calculadora de horas en formato hh:mm, permite introducirlas manualmente a seleccionándolas desde un rango,

Admite cualquier número de sumandos, basta separalos por el caracter \ . Ejemplo: hh:mm\hh:mm\hh:mm\......

Permite traspasar el resultado a la celda activa en formato hh:mm o en formato numérico.

Hour Range Calculator.xlsm