InputBoxes Exceptions

  • Thread starter Thread starter ianripping
  • Start date Start date
I

ianripping

How do I make an error report appear if characters are entered into a
input box rather than numbers and vicer versa
 
num = Application.Inputbox("Enter Numbers:", type:=1)

A number can be text, so not sure what you mean about the vicer versa.
 
This is perfect, can it be done so that if i ask for a letter and
number is inputted, a simillar error will appear
 
As I said, a number can be part of a string, so you can't do it with built
in functionality. You can have something like:

Sub AAAATester1()
Do
res = Application.InputBox("enter string", Type:=2)
If IsNumeric(res) Then MsgBox "no numbers"
Loop While Not IsNumeric(res)
End Sub
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

InputBox entries & advice 16
Adding multiple handling errors 0
Cancel Input Box error 16
InputBox 3
help with array 5
Copy the value in the Inputbox 3
Combine three InputBoxes into one? 7
Check that date exists 1

Back
Top