Ich möchte mit unteren Code erzwingen,das in TextBoxE nur Zahlen eingetragen werden müssen.
Zb. 1 oder 12.5
Leider kommt jetzt immer die MsgBox.
Könnte mir bitte jemand weiterhelfen?
Gruß
Heinz
Private Sub CommandButton1_Click()
Dim i As Integer
Dim zeile As Integer
If Not TextBoxE Like "#.#" Then
TextBoxE.SetFocus
MsgBox "Eingabe in Textbox ist Falsch"
Exit Sub
End If