ich habe eine UserForm1 mit einer TextBox1 und drei ComboBox1 bis ComboBox3.
Die ComboBox/n werden so gefüllt:
Private Sub UserForm_Initialize()
With Me.ComboBox1
.Clear
.AddItem "Paul"
.AddItem "Peter"
.AddItem "Anna"
End With
With Me.ComboBox2
.Clear
.AddItem "Laufen"
.AddItem "Schwimmen"
.AddItem "Radfahren"
End With
With Me.ComboBox3
.Clear
.AddItem "Winter"
.AddItem "Frühjahr"
.AddItem "Sommer"
.AddItem "Herbst"
End With
End Sub
Die Auswahl in den ComboBox/n soll in Abhängigkeit von der Zahl in der TextBox1 in die Tabelle kopiert werden. Wenn in z. B. in der TextBox1 eine
2 eingetragen wird, dann soll der Wert in zwie Zeilen kopiert werden.
Die Zahl aus der TextBox1 soll in die Spalte A kopiert werden.
Die Auwahl der ComboBox1 soll in die Spalte B, ComboBox2 soll in die Spalte C
und ComboBox3 soll in die Spalte D ensprechend der Spalte a kopiert werden.
Die Tabelle soll vortlaufend nach unten gefüllt werden.
Weiss jemand Rat und kann helfen? Grüße
Vielen Dank.