Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.05.2025 16:19:36
20.05.2025 15:34:36
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Controls ändern, die zur Laufzeit erstellt wurden

Controls ändern, die zur Laufzeit erstellt wurden
06.10.2008 00:03:08
OliverBreith
Hallo Spezialisten,
ich brauche mal eure Hilfe
ich habe über eine Scheife mehrere TextBoxen zur Laufzeit zu einer Userform hinzugefügt
Befehl:
for i = 1 to 10
Set Mycmd = Frame1.Controls.Add("Forms.Textbox.1", "usr_txtSamplename" & i, Visible)
next
will ich eine einzelne Textbox ansprechen, so kann ich das mit
Frame1!usr_txtSamplename1.Width = 10 tun
Wie bekomme ich aber das ganze in eine Scheife
for i = 1 to 10
Frame1!usr_txtSamplename&i.Width = 10
next
klappt nicht
auch solche Konstrukte funktionieren nicht
Frame1!("usr_txtSamplename" + CStr(i)).Width = 10
Vielen Dank im Vorraus
Oliver Breith
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Controls ändern, die zur Laufzeit erstellt wurden
06.10.2008 01:32:23
Daniel
Hi
du könntest die neu erstellten Textboxen in einem COLLECTION-Objekt sammeln.
falls dann alle abgearbeitet werden müssen, könntest du dies mit einer FOR EACH ... IN .. NEXT-Schleife erledigen.
das sieht als Code dann etwa so aus:

Dim Mycmd
Dim i As Long
Dim NeueTextboxen As New Collection
For i = 1 To 10
Set Mycmd = Frame1.Controls.Add("Forms.Textbox.1", "usr_txtSamplename" & i, Visible)
NeueTextboxen.Add Mycmd
Next
For Each Mycmd In NeueTextboxen
Mycmd.Text = ""
Next


Gruß, Daniel

Anzeige
AW: Controls ändern, die zur Laufzeit erstellt wurden
06.10.2008 09:12:00
Kawensmann
Hallo,
so müsste es gehen:
Frame1.Controls("usr_txtSamplename" & i)
Gruß
Kawensmann

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige