TextBox nur mit GanzZahl
RainerK
möchte in einer UserForm innerhalb der TextBox eine Unter- und Obergrenze festlegen.
Bis dato habe ich für die TextBox folgende Codes:
Private Sub TextBox7_Change()
Tabelle1.Cells(10, 8) = Me.TextBox7.Value
UserForm_Initialize
End Sub
Private Sub TextBox7_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case Asc("0") To Asc("9")
Case Else
KeyAscii = 0
End Select
End Sub
Hatte es mit Sub TextBox7_Exit lösen wollen. Ist aber wohl schon im Ansatz falsch.
Gruß Rainer