MsgBox problems + reloading script on error

**OnlyTheSnake** · 08-03-2011, 09:21 PM

Hi,

I have created an InputBox to get a user input on a certain set of data to appear in a form (sample file attached).

Problem 1: When InputBox first opens up, there is already a default value of '1', how do I get rid of this?
Problem 2: When the user input in InputBox doesn't match the data, I'm trying to have a MsgBox to inform them that their entry was invalid, but I keep getting a syntax error.
Problem 3: In the case that the user does enter an invalid value, how do I reload the form so they can try again?

Thanks.

**Mordred** · 08-03-2011, 10:05 PM

Hi OnlyTheSnake, Try the following code and let me know if it meets your requirements

Please Login or Register  to view this content.

**gjlindn** · 08-03-2011, 10:08 PM

Hello OnlyTheSnake. I looked at your code and I think you'd benefit from using the Find function rather than worksheetfunction.match. Here's your code slightly modified.

Please Login or Register  to view this content.

**gjlindn** · 08-03-2011, 10:11 PM

Sorry Mordred! I should have refreshed before I posted. OnlyTheSnake, Mordred's code should work just fine

**Mordred** · 08-03-2011, 10:18 PM

No need to be sorry gjlindn. We pretty much did the same thing!

**OnlyTheSnake** · 08-03-2011, 10:33 PM

I'm always amazed at the speed of responses here. Both sets of codes do exactly what I need, however gjlindn, your code still results in the default value of '1' appearing in the input box.

Thanks to both of you for replying!

**Mordred** · 08-04-2011, 09:33 AM

The value of 1 disappeared when I removed vbOkCancel from the input box.

**gjlindn** · 08-04-2011, 09:56 AM

Ah...yes, the vbOKCancel would result in a 1 since it's in the Default position of the InputBox...I missed that (I think it must have been in the original code). Deleting vbOKCancel would remove the 1 from the default text. Thanks!