Podrías crear la pregunta en el tema de excel
http://www.todoexpertos.com/preguntar?topicId=269 
Pon la macro en los eventos de tu hoja.
Te anexo la macro, cambia la columna "C:C", por la columna en la que haces la captura
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
    If Not Intersect(Target, Range("C:C")) Is Nothing Then
        If Target.Count > 1 Then Exit Sub
        If Not IsNumeric(Target.Value) Then Exit Sub
        If Len(Target) > 4 Or Len(Target) < 3 Then Exit Sub
        xmin = Right(Target, 2)
        If xmin > 59 Then Exit Sub
        If Len(Target) = 4 Then
            xhor = Left(Target, 2)
        Else
            xhor = Left(Target, 1)
        End If
        If xhor > 23 Then Exit Sub
        Application.EnableEvents = False
        Target.Value = TimeSerial(xhor, xmin, 0)
        Application.EnableEvents = True
    End If
End Sub
Sigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
 - Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
 - Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
 - Del lado derecho copia la macro
 
Saludos. Dante Amor