Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Wenn alle TextBox leer dann Exit Sub
frank
Hallo
Bei wenigen TextBox prüfe ich den Inhalt so
If TextBox3.Text = "" And _
TextBox4.Text = "" And _
TextBox32.Text = "" And _
TextBox33.Text = "" Then
Exit Sub
Bei vielen TextBox wird es doch eine lange Liste.
Die Prüfung mit einer Schleife krieg ich nicht hin.
Die TextBox befinden sich jeweils in Frame1, Frame2, usw.
Kann man auch alle TextBox in einer Frame prüfen?
Wenn alle TextBox in Frame1 und Frame4 leer sind dann Exit Sub.
gruß
Frank

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wenn alle TextBox leer dann Exit Sub
13.12.2010 17:49:31
Rudi
Hallo,
etwa so:
Private Sub CommandButton1_Click()
Dim c As Control, blnCheck As Boolean
blnCheck = True
For Each c In Frame1.Controls
If TypeName(c) = "TextBox" Then blnCheck = blnCheck And c = ""
Next
If blnCheck Then Exit Sub
End Sub

Gruß
Rudi
Vielen Dank
13.12.2010 19:17:11
frank
.
AW: Vielen Dank
13.12.2010 20:13:21
Lutz
Hallo,
warum, oder besser gesagt wodurch, wird die Variable "blnCheck" in der nachfolgenden Codezeile verändert?
If TypeName(c) = "TextBox" Then blnCheck = blnCheck And c = ""
M.f.G.
Lutz
AW: Wenn alle TextBox leer dann Exit Sub
13.12.2010 21:21:23
Gerd
Hallo Lutz!
Startwert= True
(True And True)= True
(True And False)=False
(False And True)= False
(False And False)= False
So bleibt einmal False dann False.
Notwendig ist das hier nicht unbedingt. Man könnte es auch mit
If TypeName(c) = "TextBox" And c "" then blncheck= false: Exit For
lösen.
Gruß Gerd
Anzeige
AW: Wenn alle TextBox leer dann Exit Sub
13.12.2010 21:37:19
Lutz
Hallo Gerd,
danke für die Erklärung.
M.f.G.
Lutz

398 Forumthreads zu ähnlichen Themen


Hallo,
ich habe eine umfangreiche Artikelliste (ca. 250.000 Artikel) aus einer Datanormdatei erstellt.
Aus dieser muss ich jetzt alle Artikel entfernen, dessen Artikelnummer (in Spalte A; als Text formatiert, damit führende Nullen nicht gelöscht werden) keinerlei Zahlen enthalten.
E...
Anzeige

Hallo Forum,
in Spalte G4:G92 sind folge Codes:
in G4= TAF LSZH 090600Z 090716 VRB03KT 0200 FG VV001 BECMG 0709 CAVOK=
in G5= TAF DTTA 090600Z 090716 VRB03KT 0700 FG BKN013 BECMG 1012 07010KT 8000 SCT026=
in G6= TAF EPKT 090500Z 090615 24002KT 0500 FG NSC BECMG 0608 26005KT 9999...

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
Anzeige

Hi zusammen
wie kann man excel das folgende sagen;
wenn in spalte A irgendwo eine gelbe zelle vorkommt, dann loesche mir die ganze ZEILE.
gelb sind naemlich die zwischensummen, die ich raus haben moechte.
danke euch vielmals
gruss
denis

Moin Excellianer!
Im Archiv finde ich leider nichts Vergleichbares und mit der InStr-Funktion setze ich mich auch schon bezüglich meiner Fragestellung auseinander. Komme aber leider zu keinen Ergebnissen.
In einem UserForm1 steht in der Textbox1 ein beliebiger Text von beliebiger Länge....

Hallo zusammen,
habe folgendes Problem:
habe eine große Datentabelle (B1:O31407); in dieser sollen diejenigen Zeilen gelöscht werden
in denen sowohl in der Spalte B als auch in der Spalte H der Zellwert "1" ist.
steht in einer der besagten Zellen ein anderer Werte soll nichts...
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige