InputBox Number Validation

DBA

Board Regular
Joined
May 28, 2002
Messages
100
G'day all,

Does anyone know the way to validate that an entry made into an Inputbox is numeric?

Thanks,

DBA
 

Excel Facts

Format cells as date
Select range and press Ctrl+Shift+3 to format cells as date. (Shift 3 is the # sign which sort of looks like a small calendar).

Tom Urtis

MrExcel MVP
Joined
Feb 10, 2002
Messages
11,257
See if this is what you want:

Sub TestNumber()
Dim myNumber As String
myNumber = InputBox("Enter your number below:", "Numbers only please.")
If myNumber <> "" Then
If IsNumeric(myNumber) Then
MsgBox "Click OK to continue the macro.", 64, "Valid number value was entered. Thank you."
Else
MsgBox "You did not enter a number value, try again.", 16, "Get with the program!!"
End If
End If
End Sub
 

Forum statistics

Threads
1,144,272
Messages
5,723,433
Members
422,497
Latest member
dougy99

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top