Calcular Horas

[Taribo007]

Esta bien entonces. Vamos a intentar ver donde esta le error: pon esto en el boton del fin:

Falta un parentesis en esa linea, te lo pongo en rojo:

Private Sub fin_Click()
Me.TxtHoraFinal = Time()
me.TxtTiempoTrancurrido=HoraMinutosSegundos(Datedi ff ("s", TxtHoraInicial, TxtHoraFinal))
End Sub

Un saludo