How can I prevent this from happening?

When your code changes the value in the textbox it causes the change event
code to be called. So you must set a flag so your code does not re-run:

Dim InUse As Boolean

Private Sub TextBox5_Change()
If Not InUse Then
InUse = True
TextBox5.Value = ""
InUse = False
End If
End Sub

You may be changing the value of the text box in another sub but the same
principle applies.

--
Jim
"Arjan" wrote in message
...
| Hi all,
|
| I'm working with a textbox on a userform. As the input in the textbox
exeeds
| 200 a msgbox apperas which warns the user. However, it is only a warning
as
| every value is possible..
|
| However, when I doi want to alter the value and therefor 'empty' the
textbox
| the msgbox appears again! How can I prevent this from happening?
|
| Please find my code below...
|
| any help is appreaciated!
|
| Arjan Bregman
| the Netherlands
|
|
| __________________________________________________ _______________
|
| Private Sub TextBox5_Change()
| Dim planklengte19x100 As String
|
| 'hier wordt de breedte bepaald van de zelfbouwpallet is en deze waarde
| wordt in "PALLET PRINT" gezet..
|
| If TextBox5.Value <= 200 And TextBox5.Value 0 Then
| planklengte19x100 = TextBox5.Value
| Sheets("PALLETDATA").Range("D10") = planklengte19x100
|
| Else
| MsgBox "Let op: de ingevoerde breedte is meer dan 2.00 meter!",
| vbQuestion, "Correct ingevoerd?"
|
| End If
|
| End Sub
| __________________________________________________ ________________
|
|
|
| --
| Arjan Bregman
|
| *****
| the knowledge is always there, maybe hidden, but it is there..
| *****