Verify InputBox answer 1

[vandaliarental]

I know this is a simple question, but I just can't figure out the best way to do it.

I have an InputBox prompting the user to enter a choice:

str = InputBox("Choose (A) or (B)"),"Choice","A")

I want to verify they enter either A or B, and if they enter anything else, I'd like to loop back to the question & not let them by until they pick one of the choices listed.

Any ideas?

Thanks,
Connie
Vandalia Rental

 

[PWise]

Dim str As String
str = ""
Do Until UCase(str) = "A" Or UCase(str) = "B"
str = InputBox("Choose (A) or (B)", "Choice", "A")
Loop
msgbox str

 

[vandaliarental]

Thanks,pwise!!! That's just what I was looking for!