Trying to subtract the end time from the start time and display it in an empty cell that I provided early on. I would like the number displayed in number of hours IE 1.5 Hours. but if not possible I can manage with 1:30 hours.

With the code below I get
rune time error 13
type mismatch

Private Sub txtstart__LostFocus()
    TxtStart.Text = format(TxtStart.Text, "hh:mm:ss")
    
End Sub
Private Sub txtend__LostFocus()
    txtend.Text = format(txtend.Text, "hh:mm:ss")
    
End Sub
Private Sub UpdateButten1_click()
 ............         
        .Cells(emptyrow, 5).Value = txtend.Value - TxtStart.Value
.........
end sub