Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
352to356
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
352to356
352to356
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textfeld leer -> Fehlermeldung

Textfeld leer -> Fehlermeldung
18.12.2003 17:25:36
Roland
Hallo Leute,

und zwar habe ich eine Userform mit mehreren Textfeldern die ALLE unbedingt ausgefüllt sein müssen!!!

Jetzt brauche ich einen Code für Commandbutton1, das er eine MsgBox anzeigt, das nicht alle Felder ausgefüllt sind.

Wäre super, wenn mir das jemand sagen kann.

Gruß

Roland

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textfeld leer -> Fehlermeldung
18.12.2003 17:56:46
K.Rola
Hallo,

Option Explicit

Private Sub CommandButton1_Click()
Dim c As Control
For Each c In Me.Controls
If TypeName(c) = "TextBox" Then
If c = "" Then
c.SetFocus
MsgBox "Nix da " & c.Name & " ist leer!"
Exit Sub
End If
End If
Next
End Sub


Gruß K.Rola

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige