I have been able to get this to do what i want somewhat.. however i would like to be able to expand the numbers that I allow as being a good number Inputted also loop until canceled? please See Below
Would also like to make a macro instead of a userform...
all help is very welcomed
Private Sub CommandButton1_Click()
If Sheets("Sheet1").Range("A1").Value = "7" Then *** Would like to have other numbers used with this.. not just 7.. numbers can change or be added..***
UserForm2.Show
Else ***can i loop this until it is answered or canceled?***
With Sheets("Sheet1").Range("A1").ClearContents ***clear the whole row here***
MsgBox "Not a valid Number Please try again."
End With
End If
Unload Me
End Sub
[/b]
Would also like to make a macro instead of a userform...
all help is very welcomed
Private Sub CommandButton1_Click()
If Sheets("Sheet1").Range("A1").Value = "7" Then *** Would like to have other numbers used with this.. not just 7.. numbers can change or be added..***
UserForm2.Show
Else ***can i loop this until it is answered or canceled?***
With Sheets("Sheet1").Range("A1").ClearContents ***clear the whole row here***
MsgBox "Not a valid Number Please try again."
End With
End If
Unload Me
End Sub
[/b]
