Hi
my problem is when placing a number begining wiht a letter (p80) this code does recognise it as a number so the macro take it as it is, but this couses a problem to me becasue i do want the macro to discard the number if it contains some numbers and some letters.
however, the code works fins when i put only a number (Ex: 800)
sub test()
Dim vInput As String
Dim myRow As Range
vInput = InputBox("Please Write Your Item", "Add New Item")
If IsNumeric(vInput) Then
MsgBox ("Please Enter An Item")
vInput = InputBox("Please Write Your Item", "Add New Item")
End If
End sub
yours hesham