Format a text box in user form as number but accept backspac

[SOUTHY63]

Hi,

I am trying to set up a user form with values entered into a text box then another textbox with the adition of two of them. When I hit the back space key in textbox 1 it errors as a type mismatch. How can I allow the backspace to be entered.

the code is as follows

If TextBox1 > 0 Then
If TextBox2 = "" Then
TextBox2.Value = 0
Else
End If
Dim WhitePaper As Integer
Dim ColourPaper As Integer
WhitePaper = TextBox1.Value (ERRORS HERE WITH BAKCSPACE)
ColourPaper = TextBox2.Value
TextBox3.Value = WhitePaper + ColourPaper
Else
End If
End Sub

 

[parry]

Re: Format a text box in user form as number but accept back

I wouldnt think a backpace would cause a problem but a non numeric will such as a space character. Try Trim... or the Clean worksheet function if its in between numbers (ie not first or last character). Youve only posted some of your code and you havent indicated if this is an event procedure.

WhitePaper = Trim(TextBox1.Value)