gibt es eine Möglichkeit, die Werte gleicher Elemente innerhalb einer UserForm als Schleife abzufragen (z.B. ComboBox1.value - ComboBox15.value)?
Grüsse
Frank
Dim a As Integer
For a = 1 To 15
MsgBox UserForm1.Controls("ComboBox" & a).Value
Next
Die Angabe des Userforms ist nur außerhalb des Klassenmoduls des Userforms notwendig.
For controlNumber = 1 to 15
ComboBox & controlNumber.value = auswahl
Next controlNumber
Hoffe ich habe mich richtig erinnert. Man kann auch mit for each über alle Controls gehen oder zusätzlich auf den Typ abfragen, wenn nur eine bestimmte Gruppe angesprochen werden soll.
Private Sub CommandButton1_Click()
Dim C As Control
For Each C In Me.Controls
Debug.Print C.Name, C.Name Like "ComboBox*"
Next
End Sub
VG
UserForm1.Controls("ComboBox" & i).Value
funktionierts prächtig.