Is that an exact copy of your code? if so, then look at the section here
If TextEntry <= Right(Text121.Value, 5) And TextEntry <> "0" Then
MsgBox TextEntry & ", " & Right(Text121.Value, 5) & "Not allowed"
Text123.Value = ""
Else: 'here is a label, not an else...