Check if input is a number or text

**soma104** · 03-23-2010, 01:15 PM

Hi,

I have an textbox on an excel form that requires the user to input a number. Is there a statement that I can use in my VBA to check if the value is a number or text prior to applying it to a formula.

Soma104

**mdbct** · 03-23-2010, 01:21 PM

The IsNumeric function should do the trick

If IsNumeric(textbox) then
....
Else
...
End If

**soma104** · 03-23-2010, 01:24 PM

Thank you, that's exactly what I needed.

Soma104

**Marcol** · 03-23-2010, 01:32 PM

How about not allowing any input in your Textbox, other than numbers?

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    'Allow decimal point
    If KeyAscii = 46 Then
        KeyAscii = KeyAscii
        Exit Sub
    End If
    ' Allow numbers only
    If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0

End Sub