Hallo an Alle,
ich habe folgendes Problem. Ich im untenstehenden Code es geschafft, dass mir eine UserForm mit eine vielzahl an TextBoxen erzeugt wird. Jedoch finde ich nicht herraus wie diese Textboxen nun heißen.
Immer wenn ich jetzt versuche die Werte der Textboxen auszulesen stehe ich vor dem Problem, dass ich nicht den Namen der einzelnen Textboxen kenne und somit immer die meldung erhalten (Variable nicht definiert)
Würde mich freuen, wenn ihr mich in die richtige Richtung schubsen könnt.
Dim theTextBox As Object
Dim textBoxCounter As Long
For textBoxCounter = 1 To AnzahlKontenPrämie1
Set theTextBox = KontoauszügePrämie.Controls.Add("Forms.TextBox.1", "Kontostand" & textBoxCounter, True)
With theTextBox
.Value = Sheets("Datenbank Konten Prämie").Range("L" & (textBoxCounter + 1)).Value
.Left = 90
.Width = 120
.Top = 6 + (36 * textBoxCounter)
End With
Next