ich habe eine kurze Frage. und zwar kann man ja nur Zahlen in einer Textbox zulassen. Wenn ich nun auf einer UserForm oder sagen wir mehreren UserFormen 20 oder mehr Textboxen habe, bei denen alle nur Zahlen zugelassen sind, ob man den untenstehenden Code irgendwie verallgeimeinern kann und nicht für jede TextBox einzeln machen muss- geht das?
Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1.Text) And TextBox1.Text "" Then
MsgBox "Bitte geben Sie ein Zahl ein!"
TextBox1.Text = 1
End If
End Sub
Vielen Dank und viele Grüße,Frank