Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
204to208
204to208
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

User Form bzw. If ...then

Forumthread: User Form bzw. If ...then

User Form bzw. If ...then
20.01.2003 14:14:41
Dari
Hallo, Zusammen,

möchte meine User Form gegen Falscheingaben absichern. Z.B. Wenn in Textbox keine ganze Zahl, dann MsgBox. Wie formuliere ich "Keine ganze Zahl"
Dann habe ich auch eine Datumsabfrage, die ich ebenfalls gegen Falscheingaben (Formatverstöße) sichern möchte, also dd.mm.yy, oder d.m.y sind erlaubt, aber nicht d.my oder sonstiger Quatsch.
Weiß das jemand ?

Gruß aus Reutlingen


Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: User Form bzw. If ...then
20.01.2003 16:03:46
Chris
Hallo Dari

If IsNumeric(TextBox1) = False Then
MsgBox ("blablabl")
Exit Sub
End If

If IsDate(TextBox1) = False Then
MsgBox ("blablabl")
Exit Sub
End If

Gruss aus Good Old England
Chris

Re: User Form bzw. If ...then
20.01.2003 16:25:52
guenther
hi Dari,

eine andere möglichkeitfür ganzzahl: prüfe auf punkt oder komma in der textboxeingabe

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
For i = 1 To Len(TextBox1.Text)
If Mid(TextBox1.Text, i, 1) = Chr$(44) Or Mid(TextBox1.Text, i, 1) = Chr$(46) Then
MsgBox "Bitte nur Ganzzahlen ohne Interpunktion eingeben", vbOKOnly + vbExclamation, "Fehler"
Cancel = True
Exit Sub
End If
Next i
End Sub

Gruss
günther

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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