Ansprechen dynamisch erstellter Textboxen
29.03.2004 01:01:47
Gunther
ich erzeuge bei Aufruf eines userforms mit folgendem Code Textboxen.
Private Sub UserForm_Initialize()
Dim c As Control
For s = 1 To 10
Set c = Me.Controls.Add("Forms.TextBox.1", "txt" & s, True)
With c
.Height = 15.75
.Top = 18 * s
.Left = 12
End With
Next
End Sub
Das geht auch alles und hat eigentlich gar nichts mit meinem Problem
zu tun.
Mir will es einfach nicht gelingen, diese erzeugten Textboxen per
Code anzusprechen, sprich z.B. einen Text zuzuweisen.
So etwas wie: txt1.Text = "Test" schlägt fehl mit der Meldung
Objekt nicht gefunden(sinngemäß).
Bitte um Hinweise.
Gruß Gunther
Anzeige