Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

UserForm auf Vorgabe einstellen

Forumthread: UserForm auf Vorgabe einstellen

UserForm auf Vorgabe einstellen
10.03.2003 09:49:53
Michael123
Hallo Forum,

bei Änderungen in einem Textfeld prüft folgender VB-Code, ob es sich bei der Eingabe um einen Wert handelt.
Klappt bis dahin ohne Problem.
Beim öffnen möchte ich dieses Feld jedoch auf Vorgabe "" einstellen. Hier schlägt nun aber meine Prüfung Alarm, was sie eigentlich nicht sollte.
Wie kann ich den Fehler unterbinden?


Private Sub bezirk_Change()
If Not IsNumeric(Bezirk.Text) Then
Beep
If Len(Bezirk) <= 1 Then
Bezirk = ""
Else
Bezirk = Mid(Bezirk, 1, Len(Bezirk) - 1)
End If
MsgBox "Nur Zahlen bitte", , "Falsche Eingabe"
End If
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: UserForm auf Vorgabe einstellen
10.03.2003 09:51:24
Forum

erste Zeile

If bezirk="" then Exit Sub

Re: UserForm auf Vorgabe einstellen
10.03.2003 09:53:25
Nike

Hi,
gezielt "" abfangen?
Private Sub bezirk_Change()
if bezirk.text="" then
If Not IsNumeric(Bezirk.Text) Then
Beep
If Len(Bezirk) <= 1 Then
Bezirk = ""
Else
Bezirk = Mid(Bezirk, 1, Len(Bezirk) - 1)
End If
MsgBox "Nur Zahlen bitte", , "Falsche Eingabe"
End If
end if
End Sub

Bye

Nike

Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18