Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1376to1380
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

Andere Schreibweise

Andere Schreibweise
19.08.2014 09:59:34
Jockel
Hallo,
Habe mal eine generelle Frage:
habe auf einer Userform so an die 100 Textboxen. Wenn ich die nun alle leeren will, müsste ich beispielswise 100 mal schreiben.
TextBox14.Value = ""
TextBox15.Value = ""
TextBox16.Value = ""
TextBox17.Value = ""
TextBox18.Value = ""
TextBox19.Value = ""
usw.
Kann man das irgend wie kürzen und einfach die Textboxn ansteuern, indem man irgend wie VON 14 BIS 100 schreibt ?
Danke
Jockel

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Andere Schreibweise
19.08.2014 10:10:28
Matthias
Hallo
so?
Dim obj As Object
For Each obj In Me.Controls
If TypeName(obj) = "TextBox" Then obj.Value = ""
Next
Gruß Matthias

AW: Andere Schreibweise
19.08.2014 10:14:01
Daniel
Hi
Über die Controls-Auflistung kannst Du die TextBoxen mit einen Textstring ansprechen und dann eine schleifen erstellen:
For i = 14 to 100
me.controls("Textbox" & i).value = ""
Next
Gruß Daniel

AW: Andere Schreibweise
19.08.2014 10:14:29
Rudi
Hallo,
for i = 14 to 100
controls("TextBox" &i) = ""
next i
Gruß
Rudi

Danke allen, passt .. owT
19.08.2014 11:01:06
Jockel
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige