---

Hallo Forum,
ich will ein UserForm programmieren, in denen der Benutzer in eine TextBox eine Zahl eintragen muss. Nun die Fragen, wie programmiert man es, dass nur Zahlen mit Punkt/"." als Komma, in die TextBox eingetragen werden können???

Ich freue mich über viele Antworten!!! (Programmierbeispiele wären toll!)

------------------
MfG  A. Einstein   

P.S. Rechtschreibefehler sind gewollt und dienen der allgemeinen Belustigung!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Einstein,

du fängst den KeyPress Event ab und untersuchst die Eingabe.

Code:

---

Public Function nur_Zahlen(KeyAscii As MSForms.ReturnInteger) As Integer
' Es wird nur die Eingabe von Zahlen zugelassen
' aus , wird . gemacht
'
'Verwendung beim  KEYPRESS Event des jeweiligen Controls
' KeyAscii = nur_Zahlen(KeyAscii)
 
  Select Case KeyAscii
          Case 44 ' , in .
              nur_Zahlen = 46
          Case 8, 46, 48 To 57
              nur_Zahlen = KeyAscii
          Case Else
              nur_Zahlen = 0
  End Select

End Function

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    KeyAscii = nur_Zahlen(KeyAscii)
End Sub

---

Stelli

------------------
Warum lisp'eln wenn's auch anders geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP