Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

UserForm auf Vorgabe einstellen

Forumthread: UserForm auf Vorgabe einstellen

UserForm auf Vorgabe einstellen
10.03.2003 08: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 08:51:24
Forum

erste Zeile

If bezirk="" then Exit Sub

Re: UserForm auf Vorgabe einstellen
10.03.2003 08: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
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige