Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
1456to1460
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
Inhaltsverzeichnis

Wenn Textboxen leer, dann

Wenn Textboxen leer, dann
09.11.2015 09:46:11
Jan
Hallo Ihr VBA-Experten,
ich habe in meiner UserForm 12 TextBoxen. Wenn ich auf meinen Speicherbutton klicke, wird der Inhalt meiner TextBoxen auf meine Tabelle übertragen. Jetzt soll aber geprüft werden, dass von TextBox 3-12 MINDESTENS eine mit einem Text versehen ist.
Sprich bei Textbox 1 & 2 ist es egal, ob Text drin steht. Aber wenn in TextBox 3-12 nirgends ein Text steht kommt eine Fehlermeldung.
Ich hoffe Ihr könnt mir helfen. Gruß Jan

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

Betreff
Datum
Anwender
Anzeige
AW: Wenn Textboxen leer, dann
09.11.2015 09:51:21
Rudi
Hallo,
etwa so:
for i = 3 to 12
bolFound = bolFound or controls("TextBox" &i) ""
next i
if not bolFound then
msgbox "unvollständig"
Exit Sub
end if

Gruß
Rudi

AW: Wenn Textboxen leer, dann
09.11.2015 10:08:14
Jan
Perfekt hat sofort geklappt. Danke Dir.
Gruß Jan
Anzeige

385 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige