0<>9 or 0<9 or something else

[HeSaidJoe]

Dim x As String
x = Right(Text1, 4)

If Asc(x) < 80 Or Asc(x) > 89 Then
MsgBox "no number"
End If