Confirm if textbox contains a number or text

[mosiki]

Hi all

Frustrating bit of code. I have a text box within a user form where the user will enter a number. I want to set an error check where by it checks the contents of the textbox to ensure the value entered actually is a number and not text.

I have the below code but it doesnt work correctly, I think the IsNumber vba part does not convert values such as "55" for example to a number but leaves it as text.

userform name is New_Entry
Textbox name is DebitAmt

'

 if amounts entered are not numbers show message box
    'If New_Entry.DebitAmt.Value <> IsNumber Then
        msg = MsgBox("Enter Debit amount to continue.", vbOKOnly)
    End If

Any ideas?

Thanks

Mosiki

 

[Norie]

Mosiki

There is nothing called IsNumber in VBA.

Perhaps you want IsNumeric?

If Not IsNumeric(New_Entry.DebitAmt.Value) Then
      msg = MsgBox("Enter Debit amount to continue.", vbOKOnly)
End If

 

[mosiki]

Doh! Repeat 50 times "IsNumeric not IsNumber"

Time to take a break!

Thanks Noire, Legend!