Hallo Serverus,
mir geht es um folgendes, wenn ich auf einer UserForm mehrere Kombinationsfelder habe (so ca 20) und in einer Exceltabelle folgende Zuweisungen vornehme
A B C D E F .... Y Z
W1 B1 W3 B3 W5 B5 Wm Bm
W2 B2 W4 B4 W6 B6 Wn Bn
sollen später in einer Textbox die Ergebnisse jeder zweiten Spalte angezeigt werden.
(B, D, F....Z)
Die Werte der jeweiligen KomboBoxen stehen hier als Beispiel in den Spalten A C E ... Y
Das habe ich auch schon hinbekommen, allerdings ist dann der zu generierende Code immer sehr lang und fehlerbehaftet, so lautet der Code z.B. in ComboBox4:
Private Sub ComboBox4_Change()
If ComboBox1.ListIndex <> -1 And ComboBox2.ListIndex <> -1 And ComboBox3.ListIndex <> -1 And ComboBox4.ListIndex <> -1 Then
TextBox1.Text = ComboBox1.List(ComboBox1.ListIndex, 1) & ComboBox2.List(ComboBox2.ListIndex, 1) & ComboBox3.List(ComboBox3.ListIndex, 1) & ComboBox4.List(ComboBox4.ListIndex, 1)
End If
End Sub
Jetzt kann man sich vorstellen, wie der Code dann bei der 26. ComboBox aussieht. Das müsste doch eleganter mit einer Zählschleife zu lösen sein, oder? Quasi soll die jeweilige Prozedur n mal durchiteriert werden.
Gruß,
Daniel
|