Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1724to1728
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1724to1728
1724to1728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Meldung wenn Text-/Combobox nicht gefüllt

Meldung wenn Text-/Combobox nicht gefüllt
20.11.2019 22:54:33
Gerd
Hallo zusammen,
anbei eine Frage an das Forum.
Hab eine Userform mit 10 TextBoxen und 5 Comboboxen.
Alle Inhalte aus den TextBoxen und Comboboxen werden im Tabellenblatt gespeichert.
Bis hierhin funktioniert alles.
Nun möchte ich gern eine Kontrollfunktion einfügen wie folgt:
Die 10 TextBoxen und 5 Comboboxen sollen Pflichtfelder sein.
Also wenn eine oder mehrere Pflichtfelder nicht gefüllt sind, soll eine Meldung erscheinen
z.B. "Bitte Pflichtfelder füllen" , oder "Bitte Textbox1 füllen"......
Nach Bestätigung der Meldung soll wieder zurück zur Userform springen , damit die Pflichtfelder gefüllt werden können.
Wenn alle Pflichtfelder gefüllt sind, dann soll erst gespeichert werden.
Kann mir da jemand weiter helfen.
Gerd

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Meldung wenn Text-/Combobox nicht gefüllt
21.11.2019 07:16:39
Matthias
Hallo Gerd
Alle Inhalte aus den TextBoxen und Comboboxen werden im Tabellenblatt gespeichert.
Bis hierhin funktioniert alles.

Es wäre von Vorteil gewesen, Du hättest das UserForm + Code gezeigt.
So hätte man es in Dein Orginal einpflegen können.
Nun "musste" ich alle nachbauen, um Dir zu zeigen wie es funktionieren kann.
https://www.herber.de/bbs/user/133337.xlsm
Gruß Matthias
AW: Meldung wenn Text-/Combobox nicht gefüllt
21.11.2019 07:16:40
Regina
Moin,
das würde so funktionieren:

If Me.Textbox1 = "" then
MsgBox "Wert in Textbox1 eingeben!"
Exit Sub
End If
Gruß
Regina
Anzeige
AW: Meldung wenn Text-/Combobox nicht gefüllt
21.11.2019 07:19:52
ede
Guten Morgen Gerd,
anbei mal ein Beispiel, was alle TextBoxen prüft (musst natürlich auf Deine Userform anpassen), wenn man auf den CommandButton1 klickt: 

Private Sub CommandButton1_Click()
Dim objtxt As Object
For Each objtxt In UserForm1.Controls
If TypeName(objtxt) = "TextBox" Then
If objtxt.Value = "" Then
MsgBox " Es wurden nicht alle Textfelder ausgefüllt.!", 48
objtxt.SetFocus
Exit Sub
End If
End If
Next

Es wird die erste gefundenen TextBox angewählt, die leer ist.
Gruss
Ede

Links zu Excel-Dialogen

TextBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige