VBA that will push 'enter' key after 26 digit inputted in cell

[Cross]

I need little more help my macro looks like this

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("c:c")) Is Nothing Then
If IsNumeric(Target) ThenElse On Error Resume Next
Application.EnableEvents = False 
ActiveCell.Offset(-1, 4).Select 
ActiveCell = Time 
ActiveCell.Offset(0, -3).Select
Application.EnableEvents = True
On Error GoTo 0
End If
End If
</PRE>

The goal is to move cursor after barcode scanning without touching keyboard, but scanner does not finish scanning with 'enter' key. What I need right now is a macro that will push enter key after 26 alphanumeric signs were input in cell. I'v read about Application.OnKey "{ENTER}", "myMacro" but I can't combine it with counting signs.
So I'm asking once again for Your help ​