Hallo zusammen,
Kann mir jemand weiterhelfen, wie ich dynamisch erstellte Textboxen ansprechen kann?
Habe ein Sub geschreiebn bei dem bei jedem Klick auf einen Button eine Textbox erstellt wird.
Wenn ich dann beim abschicken des Formulars beispielsweise 4 Textboxen habe, möchte ich den Inhalt irgendwo wieder geben zb in einer anderen Textbox...
Wie kann ich die erstellten Textboxen ansprechen? Habe denen beim generieren einen Namen gegeben, aber Excel kann damit nix anfangen.
Bitte um Rat.
Kann mir jemand weiterhelfen, wie ich dynamisch erstellte Textboxen ansprechen kann?
Habe ein Sub geschreiebn bei dem bei jedem Klick auf einen Button eine Textbox erstellt wird.
Wenn ich dann beim abschicken des Formulars beispielsweise 4 Textboxen habe, möchte ich den Inhalt irgendwo wieder geben zb in einer anderen Textbox...
Wie kann ich die erstellten Textboxen ansprechen? Habe denen beim generieren einen Namen gegeben, aber Excel kann damit nix anfangen.
Bitte um Rat.
Visual Basic-Quellcode
- Public klick As Integer
- Sub addAsExpense_Click()
- Dim exp As MSForms.TextBox
- Dim exp_value As MSForms.TextBox
- klick = klick + 1
- Set exp = StartForm.Controls.Add("Forms.TextBox.1") ' add textbox
- With exp ' set parameter
- .Left = 12 ' position left side
- .Width = 138 ' width
- .Top = klick * 24 + 270 ' Startposition + (klick) sum of all already pasted boxes
- .Value = StartForm.epensesBox.Value ' take description value (what kind of expenses)
- .BackColor = &H80FFFF ' color choosen
- .Name = "exp" & (klick) ' name of the created textbox
- End With
- StartForm.testbox.Value = StartForm.exp(klick).Value
- End Sub